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Quattro milioni di dischetti ODP venduti 
in Italia dai 1978 fanno del dischetto ODP 
un best seller dell'Informatica. Un suc¬ 
cesso determinato dall’alta affidabilità 
del dischetto ODP, risultato della tecno¬ 
logia edella ricerca più avanzata. Per que¬ 
sto scegli un best seller, scegli ODP. ■ 
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Disegnare con Macintosh 

Comando per comando, disegnate insieme con uno dei maggiori e più 
creativi esperti del mondo, un soggetto complesso in apparenza (e 
anche in realtà!), ma che diventa facile se realizzato con Mac. 
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Inchiesta lettori 

Un questionario per conoscere meglio i gusti e ie esigenze dei lettori di 
Applicando, che diventerà un appuntamento annuale allo scopo di fare 
un giornale sempre più in sintonia con chi lo legge. Con preghiera dì 
compilarlo e di inviarcelo... 

O Q Autopiù 

^ Con questo programma, per meccanico avrete un computer, che vi 

L—m ricorderà, alla scadenza, tutte le operazioni di ordinaria e straordinaria 

manutenzione. Perfarvi risparmiare e perché il bene automobile duri a 
lungo, in perfetta efficienza. 

31 

Instant poster 

Volete trasformare una parola, una frase, un disegno, un grafico, in un 
poster gigante, in uno striscione da appendere al muro? Facilissimo, 
basta... 

CO 

1 Golf 

L C’è un percorso di golf, in qualche parte del mondo, che vi piace in modo 
r particolare? Con questo programma potete ricrearlo sull’Apple, 
memorizzarlo su dischetto e giocarci tutte le volte che vorrete con i 
vostri amici 

PT O Macnews 

"" 'J ^ Finalmente diventa più facile procurarsi in Italia, e a volte in italiano, 
stupendi programmi per Macintosh. Eccovi l’hit-parade del mese. 

61 

AppleWorks e VisiCalc 

Continua con questo numero il corso pratico per imparare l’uso di 
AppleWorks e VisiCalc. E mentre imparate, questa volta potete 
costruire un utilissimo modello per compilare una nota spese in tre 
minuti. 

^ Macprove 

fi Grafici a colonna, grafici a torta, grafici a linee... Con questo 

tmmm programma, facilissimo da usare perché tutto in punta di mouse, è 
possibile tradurre aride sequenze di numeri in affascinanti immagini 
che... 

Bambini 

I] ■" ’l Un programma per imparare a contare in età prescolastica, un altro per 
ripassare, divertendosi, le tabelline e, infine, un terzo per migliorare 
l’ortografia. Tutti scritti da esperti di didattica. 

7C 

\ Speciale Appliscuola 

1 La stima dei frutteti, nel campo dell’estimo, riveste particolare 
/ importanza, perché la sua struttura complessa e articolata si presta 
all’applicazione di quasi tutte le formule di matematica finanziaria. Con 
questo programma... 
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Tutti i diritti di riproduzione e traduzio¬ 
ne di testi, articoli, progetti, illustra¬ 
zioni, disegni, listati di programmi, fo¬ 
tografie ecc., sono riservati a termini 
di legge. I programmi pubblicati su 
Applicando possono essere utilizzati 
per scopi privati, scientifici e dilettan¬ 
tistici, ma ne sono vietati sfruttamenti 
e utilizzazioni commerciali. I mano¬ 
scritti, i disegni, le foto anche se non 
pubblicati, non si restituiscono. 

• 

Servizio abbonamenti: Editronica srl. 
C.so Monforte 39, Milano - Conto Cor¬ 
rente Postale n. 19740208 - Una co¬ 
pia L. 5.000. Arretrati 7.000 lire. Abbo¬ 
namento 10 numeri (senza dono) L. 
40.000 (estero L. 60.000). Abbona¬ 
mento 10 numeri, più le Pagine del 
Software per Apple, L. 50.000 (estero 
70.000). Periodico mensile - Stampa: 
Sagdos, Via Europa 22/28, Brugherio 
(MI) - Fotocomposizione: News, Via 
Nino Bixio 6, Milano - Fotolito: Medio- 
lanum Color Separation, Via Marcona 
3, Milano. 1 Copyright 1985 by Editro¬ 
nica srl - Registrazione Tribunale di 
Milano n. 24 del 15.1.1983 - Pubblicità 
inferiore al 70% 



Due anni fa, proprio in questi giorni, 
nasceua in redazione il primo numero di 
Applicando. Ricordo quel periodo con gronde 
passione, nella duplice accezione del 
termine: amore e sofferenza. Amore per 
questo bambino di carta che cominciavo a 
prendere forma; sofferenza per la fatica del 
lavoro che si protraeva spesso e volentieri 
fino a tarda notte. 

Ci sembrava di essere dei pionieri, 
abbandonati da tutti. Perché non fare un 
giornale di moda o di motociclette? Più 
redditizio, forse. Sicuramente più facile. E noi 
invece testardi, a renderci pratici di queste 
macchine che sulle prime sembrano non 
ripagare tutti gli sforzi che uno ci mette. 

Una battaglio che oggi possiamo dire di 
avere vinto. E, speriamo, tante battaglie che 
abbiamo fatto vincere anche a chi ci ha 
seguito fin qui. 

In questi due anni, Applicando ha fatto 
sentire sempre più la sua voce, e la sua 
diffusione ci ha ripagato di quelle prime 
fatiche. Ma non vogliamo adagiarci sugli 
allori. Fare Applicando, tutti i mesi, è ancora 
per noi una passione. E l'aiuto dei lettori 
assume un'importanza fondamentale nel 
portare a termine questo compito. Ecco 
perché, in questo numero, troverete un 
questionario, che diventerà un appuntamento 
fisso annuale e ci servirà a conoscere meglio 
i vostri gusti e le vostre esigenze. 
Compilatelo e speditelo: per primi sarete voi 
a trarne vantaggio. Noi lo terremo in grande 
considerazione. 
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Addio anni 
di piombo 

Eh sì! L’era del fosforo è 
giunta ormai anche dove 
aveva sempre regnato il fa¬ 
scinosissimo piombo; e ha 
fatto sparire quei cassetti 
grandissimi e piatti, colmi di 
letterine grigie, pesanti e 
meticolosamente ordinate 
che mani pazienti sapevano 
combinare tra loro per pro¬ 
durre l’eterno miracolo del¬ 
la parola stampata. 

Se si ha in mente una tipo¬ 
grafia di tipo tradizionale, 
una visita alla News di Mila¬ 
no può essere fonte di non 
poche sorprese; sulle prime 
si può addirittura pensare di 
aver sbagliato indirizzo. 
Non si vedono infatti figure 
in camice nero intente a in¬ 
chiostrare rulli o ad allinea¬ 
re caratteri da stampa: la fo¬ 
tocomposizione le ha defini¬ 
tivamente consegnate al 
passato, aprendo invece le 
porte a nuove funzioni. 

"I testi vengono digitati 
sulla tastiera dell’Apple 
che, con appositi codici, ri¬ 
ceve anche le istruzioni tipo¬ 
grafiche: carattere, corpo, 
giustezza eccetera. Una vol¬ 
ta inserito, il testo viene poi 
automaticamente stampato 
su carta con un processo fo¬ 
tografico; ogni successiva 
modifica (tagli o aggiunte di 
righe, correzioni e ripensa¬ 
menti) e l'impaginazione 
vengono fatte a video e ri¬ 
mangono nella memoria 
dell’elaboratore centrale." 

Claudio Lovato, innovativo 
e intraprendente per tempe¬ 
ramento e per età, ha attrez¬ 
zato la sua tipografia con 
una ventina di Apple // e si è 
accattivato ben presto la fe¬ 
deltà di importanti clienti, 
attratti dai notevoli rispar¬ 
mi, di tempo e di denaro, 
che la fotocomposizione ga¬ 
rantisce. E, nel mondo del¬ 
l’editoria, poter accorciare 
di un giorno o due il ciclo di 
produzione è spesso provvi¬ 
denziale. 


Ad Apple si 
addice il rosa 

Dei vantaggi offerti dalla 
composizione si è ben presto 
accorta la Mondadori, gran¬ 
de madre dell’editoria italia¬ 
na. 

Ha creato a Cles uno sta¬ 
bilimento per la stampa in 
rotativa della sua produzio¬ 
ne di fascia economica ed 
elevata tiratura (Oscar, 
Gialli eccetera); e a Cles 
giungono, su carta fotografi¬ 
ca e già impaginati, i testi 
fotocomposti a Milano. 

E proprio sugli Apple del¬ 
la News vengono composti 
moltissimi Gialli e Oscar 
Mondadori, assieme alla po¬ 
polarissima collana rosa 
Harmony, i cuori palpitanti 
di molte giovani lettrici di 
questa serie tremerebbero 
forse, scoprendo che tra i 
primi a conoscere trame tan¬ 
to romantiche è stato un 
personal computer... 

"Oltre a Harmony , ai gial¬ 
li e agli Oscar" precisa Clau¬ 
dio Lovato, "qui per Monda- 
dori componiamo anche li¬ 
bri di fascia alta (un esempio 
per tutti: i Meridiani): foto¬ 


composizione infatti non si¬ 
gnifica assolutamente minor 
accuratezza o qualità infe¬ 
riore. Anzi, la quantità di 
refusi presenti nel testo fini¬ 
to, per esempio, viene senza 
dubbio nettamente ridotta". 

Se ne sono accorti infatti 


anche altri editori, che alla 
News ricorrono soprattutto 
per la produzione di periodi¬ 
ci e riviste: Playboy , Airone, 
Gardenia, Personal dine e 11 
Piacere, per nominare alcu¬ 
ne tra le testate più impor¬ 
tanti. 









In corsa 
con Apple 

Se poi una redazione si at¬ 
trezza a sua volta con Ap¬ 
ple, e invia alla News i suoi 
pezzi già su dischetto (anche 
Applicando nasce così, e al 
suo attivo ha il primato di 
aver aperto la strada a tutti 
gli altri!), i tempi di lavora¬ 
zione vengono ulteriormen¬ 
te ridotti. E questo fanno, 
per esempio, i redattori di 
Milanochorse, un nuovo pe¬ 
riodico tecnico delle corse al 
trotto e al galoppo distribui¬ 
to il fine settimana all’ippo- 
dromo di San Siro. 

"Presto, però, saremo 
presenti anche nelle agenzie 
ippiche", afferma Roberto 
Valli, direttore responsabile 
di Milanochorse. E’ lui l’i¬ 
deatore del nuovo periodi¬ 
co, ed è lui che con un Ap¬ 
ple, un Profile e un Apple- 
Works ha studiato il sistema 
per avere a disposizione per 
ogni cavallo le informazioni 
indispensabili: prestazioni, 
fantino abituale, età, sesso, 
genealogia, proprietario e 
colori. 

Grazie a questa organiz¬ 
zazione apparentemente 
semplice, è sufficiente ogni 
settimana inserire neil'ele- 
boratore i nomi dei cavalli 
che partecipano alle riunio¬ 
ni, verificare ed eventual¬ 
mente cambiare i fantini e 
assegnarli alle relative cor¬ 
se. Il giovedì arrivano i dati 
dei partenti di sabato e il ve¬ 
nerdì quelli di domenica. 
Mezza giornata per elabo¬ 
rarli con un Apple, poi il di¬ 
schetto, formattato Apple- 
Works, vola in tipografia e 
un quarto d’ora dopo ecco il 
testo composto, pronto per 
essere impaginato e stampa¬ 
to. E’ tutto qui il lavoro che 
ogni settimana Milanochor¬ 
se richiede per essere redat¬ 
to. 

"Con AppleWorks diven¬ 
ta una cosa relativamente 
semplice", continua Valli: 
"usando il clipboard posso 
spostare i nomi dei cavalli 
che corrono quel giorno nei 
file in cui sono memorizzati i 


codici per la fotocomposi¬ 
zione, quel file cioè che an¬ 
drà poi in tipografia". 

Milanochorse ha il forma¬ 
to di una pagina di quotidia¬ 
no. Si divide in due parti: su 
un lato viene elencato il pro¬ 
gramma della riunione con i 
partenti e le caratteristiche 
delle corse, sull’altro le pre¬ 
stazioni dei partenti, che, 
dopo ogni corsa, vengono 
aggiornate con puntualità 
dalla redazione. La novità 
rispetto alle altre riviste del 
settore è rappresentata dai 
parziali ottenuti a diverse di¬ 
stanze, con il relativo piaz¬ 
zamento in quel momento 
della corsa. Vengono poi 
elencate le varie possibilità 
di puntata per i sistemi trio, 
e vengono stilate tre classifi¬ 
che di favoriti per ogni cor¬ 
sa: una selezionata dalla re¬ 
dazione di Milanochorse, 
una da un driver, di settima¬ 
na in settimana differente, e 
una, non poteva mancare un 
suo pronostico, dall’Apple 
II. 

Milanochorse è un perio¬ 
dico delle Edizioni Milano¬ 
chorse, Via G.Ameglio 9, 
Milano. Telefono 3574926. 



è garantito 

E in fin dei conti un nipo¬ 
tino dell’antico alchimista 
chi, chiudendosi solenne¬ 
mente nel bagno di casa, 
estrae bacinelle e dosatori e 
si dedica a! "do it yourself" 
della fotografia. Spesso i ri¬ 
sultati sono ottimi, ma sulla 
precisione della strumenta¬ 
zione utilizzata e sulla quali¬ 
tà tecnica dei risultati qual¬ 
che appunto da fare forse 
c’è... Se si vuole un prodotto 
davvero perfetto, d’altro 
canto, non basta nemmeno 
mettersi nelle mani dei labo¬ 
ratori specializzati : a volte la 
cura artigianale e affettuosa 
del dilettante vale più del- 
l’attrezzata, ma affrettata 
perizia dei professionisti. 

Al Centro foto assistenza 
di Martina Franca (TA) 
hanno trovato una soluzione 
che dovrebbe rassicurare 


pienamente i clienti sulla 
sorte delle loro pellicole: af¬ 
fidare a un personal compu¬ 
ter il controllo qualitativo 
dei processi e delle attrezza¬ 
ture di sviluppo e stampa. 

L’Apple Ile rileva i dati 
forniti dal densitometro, li 
visualizza sullo schermo, li 
memorizza sul floppy disk e 
li trasferisce alla stampante 
e al plotter. Ogni scosta¬ 
mento dagli standard quali¬ 
tativi prefissati peri processi 
di sviluppo e di stampa (ov¬ 
viamente automatizzati), 
viene così immediatamente 
visualizzato. 

Intervenire, a questo pun¬ 
to, per ricondurre il proces¬ 
so in corso allo standard di 
qualità voluto è possibile e 
agevole, e l’uso delle attrez¬ 
zature necessarie è semplifi¬ 
cato dalla elevata qualità del 
software approntato, che 
mette subito in grado di in¬ 
terpretare i dati densitome- 
trici. 

Gli interessati a questo 
servizio computerizzato di 
controllo qualità possono ri¬ 
volgersi al Centro foto assi¬ 
stenza in via Brigata Regina 
53, 74015 Martina Franca 
(TA), telefono 080 
706910/706625. 



Due esemplari (uno è il numero zero, che porta fortuna) del foglio più letto a San Siro: 
Milanochorse. I redattori devono naturalmente fornirgli i dati, ma poi fa tutto l’Apple. 
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O SUPER VISION III. Monitorcolori 12", scher¬ 
mo antiriflesso. Possibilità di funzionamento 
in text mode su fosfori verde, ambra, bianco rever¬ 
se, selezionabili dall’utente. Risoluzione640x262. 

O VISION PAL. Monitorcolori 12", schermo an¬ 
tiriflesso. Possibilità di funzionamento in text 
mode su fosfori verde, ambra, selezionabili dal¬ 
l'utente. Ingresso videocomposito. Low cost. 

O VISION PC. Monitorcolori 12", schermo anti¬ 
riflesso. Appositamente progettato per IBM 
PC. Risoluzione 640x262. 

O RGB VISION II. Monitor colori 12”. Risolu¬ 
zione 510x262. Ingresso RGB. Filtro smoked 
in dotazione. 

O KX1201 - E. Monitor fosfori verdi 12", scher¬ 
mo antiriflesso. Ingresso videocomposito. 
Opzionale piedestallo di basculaggio KTS-1 con 


orologio LCD incorporato (rif. 16). 

O KX1212 - E. Monitor fosfori verdi 12, schermo 
antiriflesso, compatibile con IBM PC. Opzio¬ 
nale piedestallo di basculaggio KTS-2 con orolo¬ 
gio LCD incorporato (rif. 17). 

O KP910. Stampante a matrice9x9,156 colon¬ 
ne a 140 cps bidirezionali ottimizzati, trasci¬ 
namento trattori e frizione, grafica. Elevata silen¬ 
zio sità. Near letterquality. Interfaccia Centronics. 
DisponibilefirmwarepercompatibilitàconIBM PC. 
Capacità stampa su originale + 3 copie. 

Opzioni: (rif. 9) e (rif. 12). 

O KP- 810. Come KP910. Stampa su 80 colon¬ 
ne. Capacità stampa: originale + 2 copie. 

O KIF4308. Buffer di memoria esterno da 64K 
bytes espandibili fino a 256K bytes. 

Può pilotare due stampanti. 


e 


KFD 510. Minifloppy 5" 1/4 da 140K byte 


’ slim line. Per Apple computers e compatibili 
Apple. 

O KIF 3600. Interfaccia colore grafica per IBM 
PC. Da utilizzare con Vision PC (rif. 3) e super 
Vision Ili (rif. 1). 

— l KIF 3502. Interfaccia seriale RS 232 C. 


©' 


© KIF 3210 S/64. Espansione di memoria da 
64K a 256K bytes per IBM PC completa di 
interfaccia seriale RS 232 C. 

O RGB II B. Interfaccia RGB per computer 
Applell plus e Applell e, per i monitor (rif. 1) e 
(rif. 4). 


© KIF3700. Interfacciamonocromaticaestam- 
panteper IBM PC. Da utilizzare con KX1212-E 
(rif. 6) e KP 910 o 810 (rif. 7) e (rif. 8). 

















Gigante nella qualità. Le periferiche TAXAN si 
sono imposte sul mercato USA per l’eccezionale 
affidabilità che nasce da una progettazione”senza 
economia” ed un’accurata scelta dei componenti 
impiegati. 


Eledra * Sede 

Milano - Viale Elvezia, 18 

Tel.(02)34.97.51 (24linee)-Telex332.332 ELEDRAI 

Eledra * Filiali 


Partner distributivi 
Genova - Informatica Service 
Tel. (010) 56.43.35 

Udine - Asem s.p.a. 

Tel. (0432) 96.10.14 - Telex 450.608 ASEM I 


Gigante nella gamma. TAXAN offre una gamma 
completa di periferiche" made in Japan”, ideale per 
ogni tipo di personal computer( IBM, APPLE, COM¬ 
MODORE, SINCLAIR, BBC, ecc.). 


Gigante nella convenienza. Decisamente com¬ 
petitivo, il prezzo è infine un'altra piacevole qualità 
delle periferiche TAXAN. 


Torino 

Tel. (Oli) 30.99.111 - Telex 210.632 ELEDAT I 

Padova 

Tel. (049) 65.54.88 - Telex 430.444 ELEDAP I 

Bologna 

Tel. (051) 30.77.81 - Telex 213.406 ELEDAB I 

Roma 

Tel. (06) 81.10.151 - Telex 612.051 ELEDAR I 

Bari 

Tel. (080) 81.43.95 


ELEDRA f=} 

DISTRIBUTORE PRODOTTI ELETTRONICI N'1 








Due modelli della serie antifuoco Hadak MCC: 

il 100 (70 kg, 47 x 54 x 50 cm) e il 300 (165 kg, 76 x 68 x 69 cm). 


E se brucia 
l’ufficio? 

L’assicurazione, si sa, pa¬ 
ga i danni, ma non ricrea i 
file distrutti. Se alla buona 
salute dei supporti magneti¬ 
ci è affidato, come spesso 
succede, un vero e proprio 
patrimonio di dati faticosa¬ 
mente elaborati, conviene 
pensarci in tempo e proteg¬ 
gerli a dovere. Anche dalle 
fiamme. 

Pochi e semplici dati: in 
un quarto d’ora il calore svi¬ 
luppato da un incendio un 
po’ gagliardo raggiunge i 
700 gradi, e neppure i meno 
sensibili tra i supporti ma¬ 
gnetici tollerano temperatu¬ 
re superiori a 65 gradi; se 
anche l’intervento antincen¬ 
dio fosse più che tempesti¬ 
vo, essendo verosimilmente 
a base di acqua produrrebbe 
un innalzamento del tasso di 
umidità intollerabile per i 
delicati supporti, che non 
sopravvivono oltre il valore 
limite dell’85%. 

La soluzione, proposta 
dalla belga Hadak e distri¬ 
buita in Italia dalla Datama- 
tic (via Volturno 46, 20124 
Milano, telefono 
02/6886795), è un mobile 
dalla linea elegante ed es¬ 
senziale, che in caso di in¬ 
cendio resiste alla violenza 
dei mille gradi per un tempo 
più che ragionevole. È di¬ 
sponibile in varie misure, a 
seconda delle esigenze di 
stoccaggio. 


Tutto il Mac, 
opzione 
per opzione 

Organizzato dalla Etno- 
team per i giorni 15 e 16 
aprile, è in arrivo un corso di 
informatica individuale con 
il Macintosh dal programma 
succoso: finestre, icone, 
mouse; comandi, gadgets, 
funzioni generali; esempi di 
word processing (macwrite) 
e di pittura (macpaint); ge¬ 
stione di schedari elettronici 
(PFS: file e PFS: report), di 
file (filevision) e di alberi lo¬ 
gici (think-thank). La quo¬ 
ta di partecipazione, Iva 
esclusa, è di 450 mila lire. 

Sempre presso la sede 
della Etnoteam si terrà nei 
mesi di marzo e aprile una 
serie di brevi corsi per pro¬ 
fessionisti, dirigenti, re¬ 
sponsabili di gestione. Ecco 


alcuni titoli in programma. 
Il personal computer nel¬ 
l’ufficio: i fogli e i dossier 
elettronici (18 e 19 marzo, 
450 mila lire); la grafica per 
il manager (1 aprile, 250 mi¬ 
la lire) ; il personal computer 
nell’ufficio: gli archivi elet¬ 
tronici e i data base (17 e 18 
aprile, 450 mila lire). 

Per informazioni, iscrizio¬ 
ni, richieste di programmi: 
Etnoteam, via Staro 4, 
20134 Milano, telefono 02 
2141521. 


Seminario EDP 

Il consorzio interuniversi¬ 
tario lombardo per la elabo¬ 
razione automatica (Cilea) 
organizza a Milano, nei 
giorni 11 e 12 marzo, un se¬ 
minario sulle applicazioni di 
personal computing per ma¬ 
nager: gestione di budget, 
preventivi, controllo avan¬ 
zamento lavori eccetera. 

Per la partecipazione al 
corso, che si terrà al Palazzo 
delle Stelline, corso Magen¬ 
ta 61, la quota è di 550 mila 
lire Iva esclusa. Per ulteriori 
informazioni ci si può rivol¬ 
gere alla segreteria tecnica 
del Cilea, via Raffaello San¬ 
zio 4, 20090 Segrate (MI), 
telefono 02 2132541. 


Le mele 
si collegano 

Nasce da un accordo tra la 
GEIS (General electric in- 
formation Services) e la Ap¬ 
ple una nuova opportunità 
per gli utenti Apple: il colle¬ 
gamento con Mark III, la re¬ 
te del servizio di elaborazio¬ 
ne dati a distanza della stes¬ 
sa GEIS. 

Le città italiane diretta- 
mente collegate a questa re¬ 
te, che è la più estesa e capil¬ 
lare del mondo, sono già 19; 
è però perfettamente realiz¬ 
zabile il collegamento tra il 
network e le reti telefoniche 
pubbliche (nonché via te¬ 
lex), che toglie ogni vincolo 
geografico alla disponibilità 
del servizio. Anche l’acces¬ 
sibilità è illimitata: 24 ore al 
giorno, 365 giorni all’anno. 

Tra i molti personal com¬ 
puter, dicono alla GEIS, 
Macintosh presenta delle 
caratteristiche di versatilità 
e semplicità d'uso ottimali 
per integrarsi con i sistemi di 
comunicazione e con le ap¬ 
plicazioni offerti da Mark 
III. Anche in questo caso, 
dunque, beato chi ce l’ha! 























e durevole, lo screen filter è 
prodotto dalla ICS (Interna¬ 
tional computer supplies) di 
Saranno ed è in vendita nei 
negozi specializzati. 


Il raccoglitore? 
Non mi serve, 
grazie 

Pratica ed economica la 
soluzione proposta dalla 
Memorex al problema della 
conservazione dei dischetti: 
una confezione da dieci di¬ 
schetti (da 8 e da 5,25 polli¬ 
ci) contenuti in una custodia 
rigida robusta ed elegante. 
Rispetto a quella tradiziona¬ 
le in cartone questa confe¬ 
zione viene a costare legger¬ 
mente di più (quanto un di¬ 
schetto supplementare), ma 
è molto più funzionale: il co¬ 
perchio si può ribaltare par¬ 
zialmente in modo da poter 
visionare i dischi contenuti 
senza doverli estrarre, e può 
inoltre accogliere l’indice 
con i dati di riferimento. 

Rispetto ai raccoglitori 
tradizionali, a libro o a cofa¬ 
netto, la soluzione confezio¬ 
ne/raccoglitore ha il vantag¬ 
gio di costare e ingombrare 
meno, garantendo però un 
livello di protezione dei di¬ 
schi altrettanto buono. 


Screen filter, il filtro antiriflesso in monofilo poliammide 
orodotto dalla I.C.S. per il video dei personal computer. 


Un gran 
bel carattere 

Allungato, enfatizzato, 
compresso, condensato, di¬ 
latato... Il carattere della 
Panasonic KX - P 1090 è 
assolutamente versatile e re¬ 
golabile. È una stampante a 
matrice, bidirezionale otti¬ 
mizzata, con trattore e fri¬ 
zione a passo variabile che è 
possibile comandare anche 
via hardware grazie a un’ap¬ 
posita levetta. 

Ecco le principali caratte¬ 
ristiche grafiche: 80 punti e 
96 colonne, rispettivamente 
con carattere Pica o Elite 
con 80 e 96 c.p.s., set di 96 
caratteri ASCII più indiriz¬ 
zamento grafico anche a 
doppia densità. La cartuccia 
è a lunga durata: tre milioni 
di caratteri. 

Il costo. Iva esclusa, è in¬ 
feriore alle 800 mila lire. 


Tecnorama 

ufficio 

Con una notevole affluen¬ 
za di pubblico e un bilancio 
soddisfacente si è conclusa a 
Bari la prima edizione della 
fiera del computer. Più del¬ 
l’arredamento e del macchi¬ 
nario per ufficio, infatti, 
protagoniste del salone sono 
state la telematica e le co¬ 


La stampante Panasonic KX - P1090. 


municazioni nell’organizza¬ 
zione aziendale. 

È stato intenso e fruttuo¬ 
so anche il programma dei 
dibattiti: rapporti con le uni¬ 
versità e con le istituzioni, 
scambi con i paesi del Medi- 
terraneo, importanza della 
tecnologia informatica nella 
scuola, nel mondo dell'edi¬ 
toria, nella pubblica ammi¬ 
nistrazione, nel sistema ban¬ 
cario e nella ricerca medica 
sono alcuni dei titoli. Ai di¬ 
battiti hanno partecipato 
studiosi, industriali e re¬ 
sponsabili politici. 


Screen filter, 
l’antistress 

La struttura di base è mol¬ 
to semplice: un microtessu¬ 
to abbinato a una cornice 
plastica; disponibile in nero, 
verde, ocra e blu oppure 
nella versione antistatica 
(nero o grigio), questo filtro 
elimina i riflessi dallo scher¬ 
mo del computer, valorizza 
la nitidezza della videata e 
riduce lo stress visivo. 

Semplice da installare e 
facile da pulire, economico 
















^cippkz computer 



Gruppo 

Himpu'ilwi 


Apple Ile 

monitor Ile e supporto 
Disk drive aggiuntivo, 
Mouse. 


Macintosh 

512K RAM 


Apple Ile 

128K RAM, 80 colonne 
Duodisk 



sindaii - 

ZX Spectrum 48K 



8 cassette originali, 

2 libri in italiano, 
supergaranzia Rebit. 

£. 365.000 iva inclusa 



SPECTRAVIDEO 



sinEzIaii - 

Commodore 
Mcippkz computar 

olivelli 



• Via Nomentana 265/273 
Tel. 8450078 

• Via L. Bonincontri 105/107 

Tel. 5140792 

• Via Famagosta 33 
Tel. 385408 


Ulteriori informazioni saranno fornite presso i punti vendita 
































A Palermo 
è nato il MIT 

Con un nome molto lungo 
(Centro Studi Magistero di 
Informatica e Telematica), 
è stato finalmente creato a 
Palermo un istituto parauni¬ 
versitario capace di colmare 
un vuoto formativo avverti¬ 
to ormai da tempo. Il perso¬ 
nale formato dal MIT (due 
anni di frequenza) sarà in 
grado di gestire sistemi in¬ 
formativi di vasto respiro, 
per esempio nella pubblica 
amministrazione o nel setto¬ 
re bancario. Pur essendo il 
MIT un’associazione priva¬ 
ta, la frequenza ai corsi sarà 
gratuita: enti pubblici e 
aziende private, futuri dato¬ 
ri di lavoro del personale 
specializzato al Magistero di 
Informatica e Telematica, 
garantiscono infatti l’asse¬ 
gnazione di borse di studi. 
Per informazioni: MIT, 
piazza Verdi 20, 90138 Pa¬ 
lermo, tei. 091 325346. 


lizzano appunto il formato 
da 3,5". 

Il supporto magnetico ad 
alta densità, protetto da una 
robusta custodia grigia in 
plastica, garantisce, grazie 
alla levigatura superficiale, 
un intimo contatto tra testi¬ 
na e disco e quindi un trasfe¬ 
rimento ottimale delle infor¬ 
mazioni sia in scrittura che 
in lettura. 

La modulazione del se¬ 
gnale di uscita, molto bassa, 
assicura infine la massima 
stabilità, così da minimizza¬ 
re la possibilità di errori di 
lettura imputabili a variazio¬ 
ni di livello. 


Un disco 
per l’estate 

Il mercato italiano del 
floppy disk "è passato dai 6,5 
milioni di pezzi del 1983 ai 
circa 10 milioni del 1984, per 
arrivare ai prevedibili 
13-14 milioni del 1985"; sta¬ 
tistiche alla mano, Gian Pie- 



Gian Piero Cattaneo, 
direttore della divisione 
prodotti magnetici della 
Memorex. 


trionfante floppy disk da 
5,25" (5/6 del mercato); per 
l’85, che vedrà un grosso svi¬ 
luppo del mercato del porta¬ 
tile, sarà notevole di conse¬ 
guenza anche la diffusione 
del 3,5". 


Biblioteca Apple 

D. Duff, Guida al Macin- 


scrivania, la finestra e i me¬ 
nù, il word processing, 
MacWrite, MacPaint e Mac- 
Futuroe, infine, linguaggi di 
programmazione e software 
di comunicazione e di pro¬ 
duzione sono gli argomenti, 
ampiamente trattati, di que¬ 
sto libro. 


Tim Field, Using MacW¬ 
rite and MacPaint, Osborne 
McGraw—Hill 1984, pagg. 
200 

Un manuale, in inglese, 
per rendere quanto più gra¬ 
devole e fruttuoso l’uso del 
fondamentale software per 
Macintosh. MacWrite e 
MacPaint, attraverso una 
nutrita serie di applicazioni 
e di proposte, vengono esa¬ 
minati sia come programmi 
separati sia come tecniche 
creative combinate a creare 
un sistema applicativo po¬ 
tentissimo. 

Attraverso un simpatico 
percorso, con il frequente ri¬ 
corso a esempi ben illustrati, 
il lettore viene guidato a im¬ 
padronirsi di MacWrite e 
MacPaint come strumenti 




3 pollici e mezzo 
ma 500 Kb 

Certificate contro ogni 
possibilità di errore e garan¬ 
tite per sempre, arrivano le 
micro-diskettes della 3M, 
compatibili con tutti i drive 
esistenti sul mercato che ud¬ 


rò Cattaneo, direttore della 
divisione prodotti magnetici 
della Memorex, prevede 
quindi che nel 1985 si supe¬ 
rerà ampiamente il livello 
del milione di dischetti ven¬ 
duti ogni mese. 

Ma quali dischetti? L’otto 
pollici, molto amato un paio 
di anni fa, cede il passo al 


tosh, McGraw —Hill 1985, 
pagg. 220, L. 22.000 
Un’introduzione al più in¬ 
novativo dei personal com¬ 
puter veramente completa: 
le periferiche, la scrivania, il 
mouse, i menù, la finestra e 
le icone, la tastiera, i dialo¬ 
ghi, i file, i dischi, Parchi via- 
zione, la memoria sono i pri¬ 
mi argomenti trattati. Ap¬ 
profondita e chiara è poi la 
presentazione del software 
più importante: MacWrite, 
MacPaint, MacTerminal, 
Multiplan. Importanti an¬ 
che i capitoli conclusivi, de¬ 
dicati ai principali linguaggi. 


insuperabili per potenziare 
la sua personale creatività. 


Con le nuove micro-diskettes anche la 3M 
fa il suo ingresso nel mercato dei 3,5 pollici. 


Meri K. Miller e Mary A. 
Myers, Introduzione all’Ap¬ 
ple Macintosh, Muzzio 1984, 
pagg. 125, L. 16.000 

Dedicato a chi possiede 
un Macintosh e a chi ha già 
una mezza idea di acquistar¬ 
selo, questa guida introduce 
all’uso di questa "macchina 
rivoluzionaria, fortemente 
orientata verso il futuro". 

L’hardwaredel Macin¬ 
tosh, gli accessori della sua 
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Computer Center apre Genova all'informatica 

con il suo primo Computer Shop 

1984 

1 






Computer Center guida Genova nell'informatica 

con i suoi ComputerShops 


Apple a Genova é fgcippkz computer 

computer cantar 

vendita-assistenza -software -corsi 


ViaS.Vincenzol07-l09r. lei.010/581474 Genova 
Via Storace4r. tei.010/454107 (ie.Sampierdarvna 
Via S.Vincenzo I29r. tel.010/ 581SI5 Genova 
Corso Gastaldi77r. tel.010/300797 Genova 
C.soB.Aires 125 tel.0185/314142 Lavagna 



PER IL TUO APPLE // 


Vi piacciono le regate? O preferite esplorare le caverne dell’Olimpo? Oppure vorreste 
avere sul vostro schermo il fantastico gioco della scimmia che scappa arrampicandosi sulle 
pareti lisce di un grattacielo? Siete invece tipi riflessivi e vi dilettate di musica? Non 
preoccupatevi, qui c’è sicuramente quello che fa per voi. Per gli amanti di tanti giochi tutti 
insieme è disponibile una raccolta. Per chi, infine, vuole migliorare le proprie capacità di 
programmatore, ecco tutti i trucchi del Basic su dischetto. E a prezzi eccezionali. 






REGATTA. Un gioco entusiasmante che tara 
impazzire marinai esperti e meno esperti di 
qualunque età. Ogni concorrente haa 
disposizione una barca e un circuito. Poi ci 
sono i venti, gli ostacoli, gli imprevisti... Una 
grafica realistica vi farà volare tra le onde. 
Paddle o Joystick opzionali. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


CAVES OF OLYMPUS. Oltre a una grafica a 
colori ultraprofessionale, questo gioco di 
abilità sfodera suoni ed effetti speciali di 
qualità nettamente superiore. Divertente, 
intrigante e irresistibile. Non richiede né 
paddle né joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


APPLE ESCAPE. Una scimmia è fuggita dallo 
zoo e si arrampica sulle finestre di un 
grattacielo. Elicotteri le ronzano attorno e il 
guardiano dello zoo la insegue. Riuscirà a 
raggiungere il tetto e la libertà? Tutto dipende 
da quanto abili siete. Grafica a colori. Non 
richiede né paddle né joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 



MUSIC GAMES. 12 programmi educativi e 
divertenti sul filo delle 7 note. Senza bisogno 
d'altro, il vostro Apple si tramuterà in un 
docile strumento musicale dal quale 
imparare e col quale divertirsi. Sono richieste 
le paddle o il joystick. Dischetto con 
programma e manuale in elegante 
confezione asole40.000 lire. 


APPLE GAMES. 11 giochi: Flip-Flop, 
Mastermind, Towers, Sherlock's home, 
Attack of thè Zargons, Phaser Practice, 
Acey-Ducey, Big government, Tic-Tac-Toe, 
Qubic, Depth charge. E tre programmi di 
utilità: Shapetablegenerator, Opening 
ceremonies, Master catalog. Per alcuni 
giochi sono richieste le paddle o il joystick. 
Dischetto con programma e manuale in 
elegante confezione a 50.000 lire. 


BASIC TRICKS FOR THE APPLE. 35 routine 
che renderanno molto più professionali i 
vostri programmi in Basic e che vi sarà 
facilissimo imparare utilizzando il manuale e 
il dischetto offerti in elegante confezione a 
sole 50.000 lire. 


gnome e nome 

i. 


N 


p.Città 


Provincia. 


slgo la seguente formula di pagamento: 

Mlego assegno non trasferibile di lire.intestato a Editronica srl, 

rso Monforte 39, 20122 Milano 

Mlego ricevuta di versamento di lire.sul conto corrente postale 

19740208, intestato a Editronica srl, Corso Monforte 39, 20122 Milano 


Sì! Inviatemi subito, senza aggravio di spese 
postali, il o I programmi contrassegnati con 
una crocetta. 

□ REGATTA. 40.000 lire. 

□ CAVES OF OLYMPUS. 40.000 lire. 

□ APPLE ESCAPE. 40.000 lire. 

□ MUSIC GAMES. 40.000 lire. 

□ APPLE GAMES. 50.000 lire. 

□ BASIC TRICKS FOR THE APPLE. 

50.000 lire. 


ta 


Firma 










































Creare al computer un’immagine complessa e ricca di 
particolari ben definiti, con generose pennellate di vivace colore, 
senza perdere troppo tempo e divertendosi un mucchio? 
Basta avere un po’ di fantasia. Con questo orsetto scoprirete, 
passo dopo passo, quanto è facile la creatività... 


Metti Yogi 
in prima pagina 



G razie alla loro professione si sono 
sempre divertiti assai, diciamo¬ 
lo, ma adesso, di questi tempi, stanno 
passando davvero ogni limite; dise¬ 
gnatori, pubblicitari, art director, ar¬ 
chitetti, stilisti e creativi in genere so¬ 
no stati baciati in fronte dalla dea del 
progresso tecnologico: il personal 
computer è stato per loro una vera 
manna, e ha trasformato il loro lavoro 
in un eterno gioco... 

Un personal come Macintosh, poi, 
che unisce doti di grande simpatia a 
una semplicità d’uso insuperabile, 
permette la realizzazione in tempi re¬ 
cord dei prodotti grafici più vari e ric¬ 
chi; creare una qualsivoglia immagine 
non richiede infatti nessuna conoscen¬ 
za di linguaggi, né di tecniche di pro¬ 
grammazione: basta un’agilissima oc¬ 
chiata al manuale e si è pronti per crea¬ 
re. 

Creare cosa? Ciò che si vuole, natu¬ 
ralmente: disegni con testi, vignette 
con fumetti, scritte arabescate... Per 
ora, a mo’ di allenamento, eccovi un 
simpatico orsetto, con una piccola ape 
e un pesce spruzzettante. 

Mario Lovergine 
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Strumenti Caratteri Dimensioni Itile 
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TASTO OPZIONE 


TASTO COMANDO 


TAUOCOZZA MOTIUI RETINI 


tèi 
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Figura 1. La tastiera permette di dare i comandi tipografici, utilizzando il 
tasto opzione, il tasto comando e il tasto maiuscole. È inoltre possibile 
spostare, ingrandire, copiare, disegnare ortogonalmente, far slittare o ruo¬ 
tare l'immagine, renderla negativa, rifare i contorni. Tutte le altre operazioni 
si realizzano con l’uso del mouse. 

Figura 2. Ha inizio l'operazione orsetto: inserite innanzitutto il disco pro¬ 
gramma MacPaint e aprite, con il mouse, un nuovo documento. Dalla tavo¬ 
lozza degli strumenti scegliete l’ovale vuoto, e decidete lo spessore del suo 
contorno utilizzando la tavolozza delle linee; fate poi una serie di ovali e 
anche, tenendo premuto il tasto delle maiuscole, una serie di cerchi: servo¬ 
no per realizzare il muso dell’orsetto. 


Composizione Strumenti Caratteri Dimensioni Stile 
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OK | |Nessuno | 


SCREEN 6 


SCREEN 5 


Figura 3. Lo strumento da usare 
adesso è il lazo, che consente di 
ricomporre l’occhio, il muso e le 
orecchie dell’orsetto; per sposta¬ 
re la copia e sistemare così orec¬ 
chie e occhi premete invece il ta¬ 
sto opzione. La gomma, prelevata 
dalla tavolozza degli strumenti, vi 
permetterà poi di cancellare le par¬ 
ti eccedenti. Infine, dopo aver 
scelto il motivo retino, potrete 
usare il secchiello (preso sempre 
dalla tavolozza strumenti) per reg¬ 
nare alcune zone. 


Figura 4. A questo punto scegliete, dal menù strumenti, la 
funzione pennellata speculare a due specchi. 


* Rrchìuio Composizione Strumenti Caratteri OimensiorH - 


O/SCHNO 
OR COMPICCRRC 
fCORNICI 


Figura 6. Dopo aver completato il 
disegno, scegliete i motivi per i 
fondi e riempiteli con il colore; per 
la cornice, invece, dovete prima 
stabilirne lo spessore in base alla 
tavolozza delle linee e poi, pre¬ 
mendo il tasto delle maiuscole, di¬ 
segnarla. Giunti a questo punto 
dovete decidere se l’orsetto sta 
bene così da solo o se va accom¬ 
pagnato a scritte o testi per realiz¬ 
zare una copertina, un annuncio 
pubblicitario, un manifesto... Ri¬ 
chiamate in questo caso la pagina 
intera e stabilite lo spazio per il 
testo e quello per il disegno. 


Figura 5. Sempre scegliendo dal menù strumenti, 
procuratevi un pennello dalla forma più adeguata. 
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é Rrchiuio Composizione Strumenti Caratteri Dimensioni Stile 


TESTO 

TITOLO 
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é Rrchiuio Composizione Strumenti Caratteri Dimensioni Stile 


Caratteri Dimensioni Stile 
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Griglia 

Immagine Ingrandita 
Pagina Intera 
Componi un Motiuo 
Forma del Pennello 


ObSCREEN 8 


Introduzione 

Scorciatoie 


Pennellata Speculare 


SCREEN7 


Hthens ^ 

San Francisco 


Figura 9. Sistemate al centro della pagina 
l'illustrazione cosi terminata e controllate 
se c’è qualche ritocco da fare. 


Figura 7. Riquadrate lo 
spazio scelto, date l’OK 
e scegliete, dalla tavo¬ 
lozza strumenti, il ret¬ 
tangolo. Con il tasto del¬ 
le maiuscole preparate 
due quadrati, pieno e 
vuoto, duplicateli con il 
lazo e spostateli nello 
spazio voluto. Scegliete 
poi dai rispettivi menù il 
carattere, le dimensioni 
e io stile; dopo aver 
scelto, per esempio, il 
London, scrivete APE. 


Rrchiuio Composizione Strumenti 
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Neil' York 

Geneua 

Toronto 

Monaco 

Chicago 

Uenice 


SCREEN 9 


Rrchiuio Composizione 


Strumenti 


Caratteri Dimensioni Sti e 


SCRECN 9 


Figura 8. Richiamate ora la 
pagina intera, riposizionate 
la finestra e date l’OK. Dal 
menù degli strumenti sce¬ 
gliete la pennellata specula¬ 
re, in modo da poter disegna¬ 
re, con il giusto pennello, il 
pesce e l’acqua; selezionate 
poi lo spray e, dopo aver 
scelto un motivo, colorate il 
pesce. Infine, con un motivo 
diverso, riempite anche il 
fondo. 



Mario Lovergine nel suo 
studio fiorentino. Primo 
in Italia a occuparsi di 
computerai, ha al suo 
attivo una conoscenza 
del Macintosh come 
pochi nel mondo. Col 
Mac, infatti, ha 
disegnato testate di 
giornali, loghi per 
prodotti diversi e ha 
anche organizzato 
alcune mostre. Da 
questo mese comincia 
la sua collaborazione ad 
Applicando. 
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STAMPA 


SCREEN 10 


RIPRODUZIONE 0FFSET/F0T0LIT0 
COMPOSIZIONE DEL COLORE CON Lfl SOURRPPOSIZIONE 
DI RETINI IN PERCENTUALI DEI COLORI PRIMARI 


TRATTO 

DISEGNO.NERO 


N /NERO-B/BLU -G/GIRLLO-R/ROSSO 

10%-25%-50%-75%-100% 



1 00 % 


G.100% 

+8.25%. 


G.100% 
+ B.50%, 


BIANCO 


+ G.1 00 
+ R.25% 


\ 


oppure 
R.100%+ 
G.100% 


G.100%o 


B.50% 

G.1 00 — - 

✓ ^ 

. s 

R.100% — 


G.100% 

R.50% 


R.50%, 


R. 100% 
G.100% 


© 
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R.1 00%, 


Figura 10. Date le giuste indicazioni con le percentuali per il colore e passate 
pure alla stampa. 
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Applicando vuole diventare sempre più utile e gradito ai suoi lettori Per questo la 
invitiamo a compilare il seguente questionario Potrà cosi esprimere le sue esigenze e le 
sue preferenze. Pochi minuti dei suo tempo possono dimostrarsi un prezioso aiuto 
per le nostre future scelte redazionali Ringrazieremo tutti coloro che ritorneranno 
il questionario compilato con un numero gratis di Applicando 

1. Da quanto tempo lesse Applicando? 

11 . Indichi le oeriferiche che completano 

HI Dal n. 1 0 Da 3 mesi 

il suo computer. 

[21 Da 1 anno [3] Questo è il primo numero 

HI Drive aggiuntivo [ 6 ] Solo 80 colonne 

[J1 Da 6 mesi 

[2] Hard disk [7] Mouse 

2. Normalmente conserva le copie di Applicando? 

SI Stampante [J] Modem 

HI Le conservo e le rileggo spesso 

0 Plotter [|] Monitor 

i~2] Le conservo ma non le rileggo 

f~3~l Espansione di memoria con 80 colonne 

m Non le conservo 

12. Usa il suo computer soprattutto per: 

3. Ouante persone, oltre a lei. leggono la sua 

(non barrare più di 3 risposte) 

copia di Applicando? 

P~li.ftvoro [TI Gestione e finanza familiare 

m 1 [2] 2 [3] 3 05-10 0 Nessuna 

Sa scuola [ 8 ] Divertimento in famiglia 

4. L Apple che lei usa abitualmente è: 

0Sviluppo software commerciale 

fT] Di sua proprietà R] Della scuola 

[~2~| Dell'azienda dove lavora [3] Di un amico 

Ristudio in casa [ 7 ] Altro 

13. Ouanto spende t anno per il software? 

PI Meno di 200 mila lire 

f3l Non possiedo un Apple 

|~2~| Da 200 a 300mila lire 

V Specifichi quale computer usa o possiede 

!T| Da 300 a 400mila lire 

COlI Plus [2]//e [3] //c 0 Ili [5] Lisa 

RI Da 400 a 500mila lire 

[^Macintosh [7] Compatibile Apple (Leraon, ecc.) 

131 Da 500mila a 1 milione di lire 

6 . Da Quanto tempo usa o possiede lApole? 

|~ 6 ] Da 1 a 2 milioni di lire 

CD Da 2 o più anni 0 Da 6 mesi [ 5 ]Da 1 mese 

\T\ Oltre 2 milioni di lire 

S Da 1 anno [T] Da 3 mesi 

14. Ouanto spende l'anno per 1 hardware? 

7. Come considera, in venerale, la sua 

conoscenza del computer? 

HI Meno di 500mila lire 

[2l Da SCOrnila a 1 milione di lire 

Ul Principiante [T] Discreta [3] Buona 

[3] Da 1 a 1,5 milioni di lire 

S. Usa o possiede altri personal computer? 

RI Da 1.5 a 2 milioni di lire 

m Si. di mia proprietà 

[51 Da 2 a 3 milioni di lire 

[IH Sì. dell'azienda dove lavoro 

P>] Da 3 a 4 milioni di lire 

ITI Sì, a scuola [5] Sì. di un amico 

9. Se si. ne specifichi marca e modello: 

[T| Oltre 4 milioni di lire 

15. Ouanto dedica alla lettura di Applicando? 

10 . Indichi quale personal intende eventualmente 

[TI Meno di 1 ora 0 5-7 ore 

acauistare nei prossimi 12 mesi. 

0 1-3 ore 07-10 ore 

jT] Macintosh fjT]// e [JT] // c [ 4 ] Compatibile Apple 

0 3-5 ore 0 più di 10 ore 

[5] Macintesh XL [ 6 ] IBM 0 Olivetti 0 Altro 

Continua _ ^ 
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1 6. Quando trova su ÀDolicando un programma 

24. Che cosa vorrebbe veder nubbliratn di niù? 

che la interessa, cosa fa: 

|T1 Copia il listato solo se è corto 

l~ 2 1 Copia il listato qualunque sia la lunghezza 

|3~| Acquista il disco col programma 

RI Legge 1 articolo e cerca di scrivere 

un programma da sé 

17. Ouante volte ha acauistato prodotti 

oubblicizzati su Aoolicando? 

m Raramente 

3 Qualche volta S] Abbastanza spesso 

18. Ouante volte ha acauistato prodotti 

recensiti su Applicando? 

ITI Raramente 

3 Qualche volta 3 Abbastanza spesso 

19. A auante persone, in passato, ha segnalato 

o consixliato prodotti software da acouistare? 

LD Nessuna [2] 1-3 [7] 4-6 
[3 7-10 [5] Oltre 10 

20. A quante persone, in passato, ha segnalato 

o consixliato prodotti hardware da acouistare? 

[TI Nessuna [3 7-10 

3 1-3 [3 Oltre 10 

[71 4-6 

21. Mediamente, in una settimana, ouante ore 

[T| Utility per programmare 
|T| progetti hardware 

[31 Programmi per uso personale e familiare 

HI Articoli per principianti 
[31 Programmi in Pascal 

HI Corsi a puntate che insegnino a programmare 
[7] Segnalazioni di novità software 
[3 Segnalazioni di novità hardware 
[3 Articoli per uso didattico 

M Articoli su Macintosh 

O Programmi di grafica 0 Giochi 

25. Oual è la sua età? 

3 12-17 3 35-44 ® ® 

3 17-24 345-55 B 

3 25-34 (poltre 55 W 

26. Ouali studi ha frequentato? 

3 Elementari 3 Medie superiori 

3 Medie HI Università 

27. Oual è la sua attuale occuoazione? 

QUoperaio RI Libero professionista 

[^Tecnico specializzato Soirigente 
i~3l Impiegato [6] Imprenditore 

27. A auale livello di reddito mensile 

dedica al suo Apple? 

Q] Meno di 2 ore 0 12-16 ore 

CU 2-6 ore [3] 17 e più ore 

0 7-11 ore 

22. Delle rubriche fisse presenti su Applicando. 

appartiene il suo nucleo familiare ? 

3 Fino a 1.4 milioni HI Fino a 2 milioni 

3 Eino a 1.6 milioni 3 Fin» a 2.5 milioni 
[31 Fino a 1.8 milioni 3 Oltre 2.5 milioni 

quali la interessano di più e quali meno? 

Di dìù Meno 

Q] Applichi Q] 

3 A PPlicosa [ 2 ] 

[3] Applettere [|] 

[ 4 ] Applihelp [7] 

[31 Appliscuola [ 5 ] 

23.0uali altre riviste di comouter lexxe? 

ITj Micro e personal computer [31 Bit 

[T| Microcomputer [ 6 ] Personal time 

HI Personal computer 3 Nessuna 

HI Radioelettronica «.computer 3 Altre riviste 

[TI Sono abbonato. Prolungate gratuitamente 
di un numero il mio abbonamento 

3 Non sono abbonato. Speditemi gratuitamente 
il snellente numero di Aoolicando: 

(Attenzione i nn. 1 e 2 sono esauritili 

DATI FACOLTATIVI 

NOME 

COGNOME 

INDIRIZZO 

CAP CITTA 

PROVINCIA 
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Se non volete problemi di memoria, 
meglio far lavorare 3M. 



I problemi di memoria di 
un’azienda trovano la prima rispo¬ 
sta nella 3M già nel 1951, anno in cui 
la 3M sviluppò il primo nastro ma¬ 
gnetico per computer. 

Questo dato la dice lunga sul 
primato di esperienze tecnologiche 
maturate in questo campo dalla 3M, 
sul patrimonio di qualità e affidabili¬ 
tà della produzione 3M nel settore 
dei supporti magnetici. 

Prendiamo le diskettes, ad 
esempio: omologate dai maggiori 


costruttori, certificate al 100%, ga¬ 
rantite 5 anni, esportate in tutto il 
mondo, distribuite in Italia attraverso 
una rete capillare di 400 punti ven¬ 
dita. E soprattutto disponibili in una 
gamma completa sia nella misura 
da 8 pollici che in quella da 5 e 1/4, e 
con un esclusivo rivestimento ma¬ 
gnetico che consente un’eccezio¬ 
nale resistenza all’usura e la massi¬ 
ma affidabilità. 3M ha sempre una 
risposta pronta per i vostri 
mi di ufficio. 


E non solo con i prodotti per l'in¬ 
formatica. Ma anche con i sistemi di 
fotocopiatura, microfilmatura, visual 
e di telecomunicazione. 

Perchè 3M lavora offrendo so¬ 
luzioni “ad alta tecnologia" per il vo¬ 
stro ufficio. E per tutti gli uffici. 

3M. SISTEMI 
PER L’UFFICIO 


DISTRIBUTORI 
AUTORIZZATI IN TUTTA 
ITALIA 

VEDI PAGINE GIALLE 
ALLA VOCE 
MECCANOGRAFICI 
FORNITURE PER 


Prodotti per l’Informatica 

Divisione Sistemi per l’Ufficio 

Sede: Via S. Bovio, 1/3 - 20090 Milano S. Felice - Segrate Tel. 02/75451 
Filiali: Torino Tel. 011/6192192 • Mestre Tel. 041/962255 - Genova Tel. 010/451801 • 

Bologna Tel. 051/557157 - Firenze Tel. 055/355841 - Roma Tel. 06/58421 - Napoli Tel. 081/660266 



































Ogni automobilista spende in media 500.000 lire l’anno 
per la manutenzione della propria automobile. Una cifra 
non piccola, che spesso raddoppia o triplica se si 
trascurano gli interventi da effettuare a intervalli regolari. 
Ma come si fa a ricordare tutto? Con questo programma... 


DOS 3.3 


LPmDIISL 


APPL E //e 
APPLE //c 


... per meccanico 


avrò un computer 



S copo principale della manuten¬ 
zione è la prevenzione dei danni. 
Tutte le parti in moto e tutte le parti 
esposte agli agenti atmosferici sono 
soggette a usura, che prima o poi si 
trasforma in guasto o danno. 

Quando le conseguenze dell’usura 
si sono manifestate, quasi sempre è 
troppo tardi per correre ai ripari, e il 
danno, anche se rimediato, avrà ormai 
"marchiato" il veicolo in maniera irre¬ 
versibile. Questo comporta un aumen¬ 
to dei costi complessivi e, peggio anco¬ 
ra, un decadimento della sicurezza del 
veicolo. 

È quindi molto importante stabilire 
programmi di manutenzione che pre¬ 
vedano controlli, ricambi e riparazioni 
da eseguire a scadenze fisse. E con 
l’aiuto di un computer, non c’è perico¬ 
lo di dimenticare qualche data o qual¬ 
che operazione. 

A seconda delle operazioni da com¬ 
piere, le scadenze possono essere ogni 
1.000, 2. 500, 5.000, 10.000, 30.000, 
50.000 chilometri. 

Questi periodi sono indicativi e pos¬ 
sono variare a seconda dei tipi di auto¬ 
mobile. La cosa migliore è fare riferi¬ 
mento al libretto di uso e manutenzio¬ 
ne relativo alla propria auto. Comun¬ 
que, in tutti i veicoli gli interventi più 
numersi sono quelli da eseguire ogni 
10.000 chilometri. 

Immettete quindi senz’altro nel 
computer i dati contenuti nella tabella 
1, completando poi il lavoro, come già 
suggerito, facendo riferimento al ma¬ 
nuale della vostra automobile. Baste¬ 
rà poi utilizzare il programma una vol¬ 
ta al mese, immettendo mese, anno e 
lettura del contachilometri: il compu¬ 
ter genera automaticamente un elenco 
delle voci per le quali è arrivato il mo¬ 
mento della manutenzione. 


Configurazione 

Il programma è stato messo a punto 
su un Apple //e ed è stato eseguito su 
un Apple II Plus. Richiede un solo 
dischetto, mentre la stampante è fa¬ 
coltativa, ma utile per stampare l’elen¬ 
co delle operazioni di manutenzione. 
Il programma è strutturato in modo 
che supporti una stampante del tipo 
Apple Silentype, Prowriter, Image- 
writer o Dot Matrix Printer. Eventual¬ 
mente potete adattare la linea 2090 


perché supporti la stampante che ave¬ 
te a disposizione. 

Per usare AUTOPIU’ basta digitare 
il programma in Applesoft—BASIC 
del listato 1. 


Questo passo sarà il più arduo e 
quello che richiederà il maggior tem¬ 
po, se si esclude la digitazione del pro¬ 
gramma. Occorrerà trovare il manua¬ 
le dell’auto e gli ultimi dati di manu¬ 
tenzione. Sulla base del manuale della 


Immissione di dati 
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macchina si deve compilare una lista 
delle voci per le quali si desidera il 
servizio a intervalli periodici (per 
esempio olio, filtro dell’olio, filtro del¬ 
l’aria, pneumatici, messa a punto del 
motore, freni, liquido dei freni, liqui¬ 
do dello sterzo, liquido della trasmis¬ 
sione, batteria e via dicendo). A fian¬ 
co di ciascuna voce indicate se deside¬ 
rate cambiarla o esaminarla. Poi ag¬ 
giungete la data dell’ultima revisione 
periodica (mese e anno) e la lettura del 
contachilometri. Se non conoscete la 
lettura iniziale del contachilometri, 
stimate la distanza che percorrete 
mensilmente e fate il calcolo del chilo- 
metraggio risalendo fino alla data del¬ 
l’ultima manutenzione, in modo di 
avere una stima approssimativa ma 
non troppo lontana dal vero. Sulla ba¬ 
se del manuale annotate il chilome¬ 
traggio e i mesi raccomandati per cia¬ 
scuna voce come intervallo fra una re¬ 
visione periodica e la successiva. 
Quando avrete raccolto queste infor¬ 
mazioni, sarete pronti a creare il vo¬ 
stro primo file di manutenzione perio¬ 
dica. 

Struttura dei dati 

Tutti i dati sono memorizzati sul di¬ 
schetto in un file di testo ad accesso 
casuale creato con il NOME DEL¬ 
L’AUTO. Il file è denominato FILE 
DI MANUTENZIONE, e può com¬ 
prendere un massimo di 50 VOCI DI 
MANUTENZIONE. A ogni VOCE 
DI MANUTENZIONE sono associa¬ 
te sette variabili stringa: nome della 
VOCE DI MANUTENZIONE, flag 
di CONTROLLO/ISPEZIONE, 
CHILOMETRI MANUTENZIO¬ 
NE, LETTURA CHILOMETRI, 
MESE MANUTENZIONE, DATA 
MANUTENZIONE, e NOTE 
EVENTUALI. Ognuna delle VOCI 
DI MANUTENZIONE è memorizza¬ 
ta nella matrice CK$ e nel FILE DI 
MANUTENZIONE sul dischetto. 

Creazione del file 
di manutenzione 

Quando si esegue il programma vie¬ 
ne da principio presentato il seguente 
menù principale: 


1. CREA FILE 

DI MANUTENZIONE 

2. EDITA FILE 

DI MANUTENZIONE 

3. ELENCO OPERAZIONI 
DI MANUTENZIONE 


4. AGGIORNA 
DATA/CHILOMETRI 

5. FINE 


Dopo aver scelto l’opzione 1 per 
creare il file di manutenzione, il com¬ 
puter chiede di introdurre il nome del 
file auto. Questo nome verrà usato per 
creare un file di testo ad accesso casua¬ 
le. Se si vuole in epoca successiva cam¬ 
biare il nome del file, basta usare il 
comando RENAME del DOS nel mo¬ 
do di comando diretto. Premendo il 
tasto RETURN si torna da questo 
punto al menù principale. 

Introducendo la parola CATALOG 
si potrà vedere quali nomi di file auto 
si hanno sul dischetto. Questo sistema 
funziona ogni volta che il programma 
chiede il NOME DEL FILE AUTO. 
Dopo avere introdotto un nome di file 
auto (per esempio FIAT ARGENTA) 
si vedrà questa schermata: 


D) INTRODUCI DATI 

MANUTENZIONE O E) ESCI 

1. VOCE DI MANUTENZIONE: 

2. C) CAMBI O I) ISPEZIONI: 

3. CHILOMETRI 

DI MANUTENZIONE 


4. LETTURA CHILOMETRI 
(ULTIMO C/L) 

5. MESE MANUTENZIONE: 

6. DATA (ME/AN-ULTIMO C/I): 

7. NOTE: 


Il programma chiede dapprima se si 
desidera INTRODURRE DATI o FI¬ 
NIRE. Quando si sceglie D per intro¬ 
durre dati si comincerà introducendo 
le sette voci di dati elencate. Il campo 
della VOCE DI MANUTENZIONE 
è lungo 20 caratteri e richiede un’in¬ 
troduzione di testo (per esempio tergi¬ 
cristallo, pressione pneumatici e così 
via). La voce di dati seguente stabili¬ 
sce se la VOCE DI MANUTENZIO¬ 
NE deve essere cambiata o ispeziona¬ 
ta, e richiede come risposta Col. 

Il campo dei CHILOMETRI DI 
MANUTENZIONE è lungo cinque 
caratteri e richiede i chilometri percor¬ 
si fra una manutenzione e la successi¬ 
va, e non accetterà meno di 1000 chilo¬ 
metri. La voce di dati numero quattro 
è la LETTURA CHILOMETRI (sul 
contachilometri) all’epoca in cui è sta¬ 
ta fatta l’ultima volta la manutenzione 
per questa VOCE DI MANUTEN¬ 
ZIONE. Il campo del contachilometri 


è lungo sei caratteri e non accetta lo 
zero. Il campo MESE DI MANU¬ 
TENZIONE serve a memorizzare il 
mese in cui effettuare una determinata 
operazione di manutenzione, se que¬ 
sta è indipendente dai chilometri per¬ 
corsi. L’inserimento richiede un for¬ 
mato di ME/AN di cinque caratteri: 
per esempio 04/83 (i mesi di una sola 
cifra devono essere preceduti dallo ze¬ 
ro). 

Il campo delle NOTE è lungo 20 
caratteri e serve per memorizzare an¬ 
notazioni riguardanti la VOCE DI 
MANUTENZIONE (per esempio 
una marca e tipo particolare di olio, o 
il numero di ricambio di un determina¬ 
to pezzo, come il filtro dell’aria, ecc.). 
Né VOCE DI MANUTENZIONE né 
NOTE accettano virgole o due punti. 

Una volta introdotte eventuali note, 
saranno presentate sullo schermo le 
opzioni di E) editare una qualsiasi del¬ 
le voci di dati, R) REGISTRARE i 
dati, C) CANCELLARE (eliminare) i 
dati e X) USCIRE. Quando si esce si 
avrà un’occasione di salvare i dati pri¬ 
ma di ritornare al MENU’ PRINCI¬ 
PALE. Di norma si usa R) per indica¬ 
re che si è soddisfatti dei dati e pronti a 
introdurre la successiva VOCE DI 
MANUTENZIONE. Usando l’opzio¬ 
ne R) si inviano i dati al file sul dischet¬ 
to e si pulisce lo schermo. Il cursore si 
posiziona allora alla fine della riga D) 
INTRODUCI DATI MANUTEN¬ 
ZIONE o E) ESCI. Una risposta di E) 
rimanda al MENU’ PRINCIPALE, e 
il FILE AUTO viene chiuso da CLO- 
SE. Quando si sono introdotte tutte le 
VOCI DI MANUTENZIONE si può 
terminare l’immissione di dati con E) 
o con X. 

Correzioni e aggiunte 

Si può intervenire nel file di manu¬ 
tenzione per aggiungere voci nuove o 
per effettuare correzioni in quelle già 
esistenti scegliendo l’opzione 2, EDI¬ 
TA FILE MANUTENZIONE. Con 
questa opzione è possibile anche stam¬ 
pare la lista delle operazioni di manu¬ 
tenzione da effettuare. 

Quando si sceglie questa opzione, il 
programma chiede il NOME DEL FI¬ 
LE AUTO che si vuole EDITARE. 
Se il file richiesto esiste effettivamente 
in memoria, viene visualizzato il se¬ 
guente MENU’ DI EDITING: 


1. CAMBIA DATI 
MANUTENZIONE 


2. AGGIUNGI VOCI 
MANUTENZIONE 
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3. CANCELLA VOCI 

MANUTENZIONE 

4. ELENCO VOCI 

DATI MANUTENZIONE 
A questo punto l’introduzione di un 
RETURN rimanderà al MENU’ 
PRINCIPALE. Per utilizzare le op¬ 
zioni CAMBIA DATI MANUTEN¬ 
ZIONE e CANCELLA VOCI MA¬ 
NUTENZIONE si deve conoscere il 
numero della VOCE DI MANUTEN¬ 
ZIONE: potete facilmente appurare 
qual è scegliendo l’opzione 4, LISTA 
VOCI MANUTENZIONE/DATI. 
Quest’opzione apre a video la presen¬ 
tazione del seguente menù STAMPA 
INDICI: 


1. STAMPA LISTA VOCI 
DI MANUTENZIONE 


2. STAMPA DATI VOCI 
DI MANUTENZIONE 


3. STAMPA ELENCO 
OPERAZIONI 


Per tutte le opzioni è possibile la 
stampa sul video (che viene attivata 
con V) oppure la stampa su carta (che 
viene attivata con S). L’opzione 1 of¬ 
fre l’indice delle voci di manutenzio¬ 
ne, cioè l’elenco delle voci di manu¬ 
tenzione con i relativi numeri. L’op¬ 
zione 2 presenta i DATI DI MANU¬ 
TENZIONE per ogni singola VOCE 
DI MANUTENZIONE. L’opzione 3 
elenca tutte le operazioni di manuten¬ 
zione da effettuare con i relativi dati. 
Con RETURN si torna dal menù di 
STAMPA INDICI al MENU’ DI 
EDITING. 


Quando viene scelta la terza opzio¬ 
ne, per avere la lista delle operazioni 
di manutenzione da compiere, il com¬ 
puter chiede quanti chilometri segna 
al momento il contachilometri dell’au¬ 
to, la data sotto forma di mese e anno 
(ME/AN) e se si vuole stampare l’e¬ 
lenco a video (V) o su carta (S). A 
questo punto il programma esegue au¬ 
tomaticamente un controllo e quindi 
elenca le operazioni di manutenzione 
che devono essere efettuate o perché 
l’auto ha percorso il chilometraggio in¬ 
dicato nella tabella di manutenzione 
per quelle determinate operazioni op¬ 
pure perché è scaduto il tempo d’inter¬ 
vallo tra una manutenzione e l’altra. 
Completata la lista, si può tornare al 
MENU’ PRINCIPALE. 

Attenzione, però: il richiedere la li¬ 
sta delle operazioni di manutenzione 


LISTATO 1 

■ALL'ULTIMO AGGIORNAMENTO C:CKi(I.3):')”: NORMAL : 

PRINT : PRINT 'FINE LISTA:':! = R0: GOTO 430 

!0 REM *********************** 

340 DM = MO - MlsDY = YR - Yl: IF DY ) 0 THEN DM = DM + (12 * 

20 REM * AUTORI!!' * 

DY) 

30 REM * 01 WOODY ADtfISON * 

350 IF DM = > VAL (CKid,5)) THEN 370 

40 REM * COPYRIGHT (C) 1985 * 

330 IF FL = 0 THEN 430 

50 REM * BY APPLICANDO fi * 

370 X = X * 2: IF Pi = ’S' THEN PRINT 3PC< 57;'CK'; CHRi ( 

30 REM * MICR0SPARC, INC. * 

95): CHRi (95): CHRi (95):' ’: 

380 IF CKid.2) = *C THEN PRINT SPC( 4 - LEN ( STRI 

70 REM *********************** 

80 ONERR GOTO 170 

(I)))I'CaMBI ': 

90 CSI = “:Di = CHRi (4): OIM CKi'50,7): GOSUB 2110 

100 HOME : TEXT : VTAB 2: HTAB 13: PRINT “AUTORI U ": 

390 IF CKid,2) = M" THEN PRINT I; SPC( 4 - LEN ( STRI 
d)))j’ISPEZIONI/CONTROLLI '; 

VTAB ii PRINT 'MENU' PRINCIPALE* 

400 PRINT CKid,1): IF CKid,7) < > " THEN PRINT SPC( 1 

110 VTAB 8: HTAB 1; PRINT *1. CREA FILE MANUTENZIONE": PRINT 

2)"NOTE: ':CKÌd.?):X = X * ! 

‘2. EDITA FILE MANUTENZIONE’: PRINT ‘3. ELENCO OPERAZIO 

410 IF X = >14 AND Pi = "V THEN X = Q:VT = 22: GOSUB 205 

NI DI MANUTENZIONE" 

0: VTAB 4: HTAB 1: CALL - 958 

120 PRINT ‘4. AGGIORNA DATA/CHILOHETRI': PRINT "5, FINE* 

420 IF Pi = 'V THEN PRINT 

130 VTAB 15: HTAB 1: CALI - 868: PRINT "SCEGLI >“:: GET A» 

: D RINT AiiA = VAL (Ai): IF A < 1 OR A > 5 THEN 130 

430 NEXT I: PRINT CHRi (12): PRINT Di;‘PR#0’:VT = 22: GOSUB 

2050: RETURN 

140 0N A GOSUB 350,350,230,440,100 

440 REM AGGIORNA MANUTENZIONE 0ATA/CHIL0METRI 

150 GOTO 100 

450 HOME : VTAB 2: PRINT 'AGGIORNA. MANUTENZIONE DATA/CHILOM 

160 GOSUB 1910: END 

ETRI:' 

170 REM ROUTINE DI ERRORE 

430 VT = 5: GOSUB 1930 

180 ER = PEEK (222):LN = PEEK (218) + 253 * PEEK (219) 

470 VT = 7: GOSUB 2010 

190 IF ER = 3 ANO LN = 700 THEN 740 

48C X = 0:Y = 1: VTAB 5: HTAB 1: CALL - 958 

200 IF ER = 3 AND LN = 2000 THEN POP : RETURN 

490 FCR ! = ! T0 R0:X = X * 1: PRINT I" ';CKt(l,1) 

210 IF ER = 22 THEN 100 

500 IF X = 15 THEN GOSUB 530:Y = Y * 15: VTAB 5: HTAB 1: CALL 

220 POKE 213,0: RÉSUMÉ 

- 958:X = 0 

230 REM ELENCO OPERAZIONI DI MANUTENZIONE 

510 NEXT I: IF X ) 0 THEN GOSUB 530 

240 HOME : VTAB 2: PRINT "CREA PROMEMORIA MANUTENZIONE:" 

520 GOSUB 1840: FOR R = 1 TO R0: GOSUB 1930; GOSUB 1870: NEXT 

250 VT = 5: GOSUB 1930:VT = 7: GOSUB 2010:VT =11: GOSUB 208 

R: GOSUB 1910: RETURN 

0 

530 VTAB 21: HTAB 1: CALL - ?5G: PRINT 'INTRODUCI IL N. DE 

230 VTAB 2: HTAB 1 : CALL - 953; PRINT SPC( 5):’ELENC0 SCA 

DENZE MANUTENZIONE: PRINT SPC( 5)CF$; PRINT 

LLA MANUTENZIONE': PRINT '(DA ':Y" A ':Y + X - 1 ;*)'; 

540 VTAB 22: HTAB 21: PRINT "(E PER'FINIRE) : NORMAL : 'VTAB 

270 X = 0:MO = 'VAL !0Ai):YR = 'VAL < RIGHTi (0AÌ.2)): PRINT 
: PRINT SPC< 5):"DATA: ":DAi; SPC( 5);'CHILOMETRI: ";0 

21: HTAB 33: CALL - B33: INPUT "":A1:A = 'VAL (Ai): IF 

Ai = 'E' THEN RETURN 

Di: PRINT 

550 IF A ( 0 THEN 330 

280 F0R I = 1 TO R0:FL = 0: IF 'VAL (CKKI.4)) ) OD THEN PRINT 

530 IF A i Y OR A > Y * X - ì THEN 540 

Dii'PRSC': P R!NT : INVERSE : PRINT “LETTURA CONTACHILOM 

ETRI ERRATA": PRINT 'VOCE MANUTENZIONE N.';I: PRINT 'I 

570 MO = VAL (DAÌ):YR = VAL ( RIGHTi (DAÌ.2)):M1 = VAL (C 

KÌ(A,3)):Y! = 'VAL ( RIGHTi (CKÌ(A,3),2)):0D = VAL (OD 

CHILOMETRI INTRODOTTI C:0D;')‘ 

290 IF VAL (CKÌ<1.4)) > OD THEN PRINT 'SONO INFERIORI ALL 
'ULTIMA LETTURA": PRINT "DEL CONTACHILOMETRI <":CKÌ(1,4 
>:•)■: NORMAL : PRINT : PRINT "FINE LISTA!":! = R0: GOTO 

430 

i):01 = VAL (CKÌ(A,4)i 

560 IF 00 < 01 THEN VTAB 21: HTAB 1: CALL - 953: PRINT CHRi 

(?):: INVERSE : PRINT ‘ERRORE LETTURA CONTACHILOMETRI - 

ATTUALE > ULTIMA MANUTENZIONE!': NORMAL :VT = 23: GOSUB 

2050: GOTO 530 

300 IF (00 - VAL (CKÌ(I,4))) = ) VAL (CKid,3)) THEN FL = 

590 IF YR < Yl THEN VTAB 21: HTAB 1: CALL - 958: PRINT CHRi 

1 

310 MI = VAL (CKid,3)):Y1 = 'VAL ( RIGHTi (CKÌ(1,3).2» 

320 IF Y1 > YR THEN PRINT Di : " PRN0 c : PRINT ; INVERSE ; PRINT 

(7);: INVERSE : PRINT "AWO ERRATO - ANNO ATTUALE < U 

LTIMA MANUTENZIONE! 1 : NORMAL :VT = 23: GOSUB 2050: GOTO 

530 

"ANNO ERRATO' VOCE MANUTENZIONE N.'ji: PRINT 'L'ANNO IN 
TRADOTTO C;YRi*) E' INFERIORE'; PRINT "ALL'ULTIMO AGGI 

300 IF MO < M! AND YR = Yl THEN VTAB 21: HTAB 1: CALL - 9 

58; INVERSE : PRINT CHRi (7)"MESE ERRATO - ATTUALE < 

ORNAMENTO •.•Yl;*)*: NORMAL : PRINT ; PRINT "FINE LISTA: 

ULTIMA MANUTENZIONE!': NORMAL :VT = 23: GOSUB 2050: GOTO 

* : I = RO: GOTO 430 

530 

330 IF Yl = YR ANO HI ) MO THEN PRINT [>ì:■ PR80 * : PRINT : 

310 VTAB (A - Y + 5): HTAB 1: INVERSE : PRINT A;: NORMAL 

INVERSE.J PRIMI 'MESE ERRATO! VOCE MANUTENZIONE N.“il : 

320 CK1(A,4) = 0D$:CKi(A,3i = DAI: GOTO 540 

PRINT "LA DATA INTRODOTTA <* ;DAi; *) E'"INFERIORE': PRINT 

Continua 
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da eseguire non aggiorna automatica- 
mente i dati delle varie voci di manu¬ 
tenzione, in quanto non è detto che la 
manutenzione di quelle voci venga 
eseguita immediatamente; l’aggiorna- 
mento, infatti, deve essere eseguito 
servendosi dell’opzione 4 del menù 
principale. 

Aggiornamenti 

La scelta dell’opzione 4 del menù 
principale, AGGIORNA DATA- 
/CHILOMETRI, permette di intro¬ 
durre una specifica DATA (ME/AN) 
e la LETTURA DEL CONTACHI¬ 
LOMETRI, e di aggiornare con questi 
nuovi dati determinate voci di manu¬ 
tenzione. 

Sullo schermo vengono visualizzate 
un massimo di 15 voci di manutenzio¬ 
ne. Basta introdurre il numero corri¬ 
spondente a una determinata opera¬ 
zione di manutenzione, effettuata nel¬ 
la data corrente, e la lettura del conta- 
chilometri. Il numero accanto alla vo¬ 
ce di manutenzione viene cambiato in 
CAMPO INVERSO a indicare che è 
stato selezionato. 

Per rimediare a un eventuale errore 
introducete il numero di voce con un 
segno negativo (—) davanti. In questo 
modo viene eliminato l’INVERSO e si 
accede al dischetto per il recupero dei 
vecchi dati. Una volta completato l’ag¬ 
giornamento di questa prima pagina di 
dati, l’opzione E) fa passare alla pagi¬ 
na successiva, nella quale compaiono 
altre 15 voci di manutenzione. Quan¬ 
do l’aggiornamento è completo, tutti i 
nuovi dati vengono memorizzati su di¬ 
schetto e si torna al MENU’ PRINCI¬ 
PALE. 

Il tasto RETURN 

AUTOPIU’ è stato scritto in modo 
che riconosca un RETURN di risposta 
a una richiesta di scelta di menù come 
"ritorno all’ultimo menù", di modo che 
si possa usare il tasto RETURN per 
uscire dai vari sottomenù. Tuttavia un 
RETURN non è riconosciuto in que¬ 
sto modo quando vengono chieste spe¬ 
cifiche informazioni (per esempio da¬ 
ta, lettura del contachilometri, dati di 
servizio e così via). La sola eccezione è 
la richiesta del NOME DI FILE DEL¬ 
L’AUTO, dato che in questo caso un 
RETURN rimanderà al MENU’ 
PRINCIPALE. 

Come funziona 

La parte più difficile della progetta¬ 
zione del programma è stata quella 




della formulazione di schermate che 
fossero interattive con l’utente, ma 
semplici da usare. Quando si fa girare 
il programma, viene impostato dalla 
linea 80 il flag ONERR, sono dichiara¬ 
ti alcuni valori iniziali e viene predi¬ 
sposta, per contenere il FILE DI MA¬ 
NUTENZIONE, la matrice bidimen¬ 
sionale CK$. Poi viene presentato il 


MENU’ PRINCIPALE, sul quale si 
può scegliere se creare, editare, listare 
o aggiornare tutta una serie di opera¬ 
zioni di manutenzione. 

Viene usato un ON GOSUB per in¬ 
dirizzare il programma alle diverse 
routine. Chi usa per la prima volta il 
programma deve introdurre la subrou¬ 
tine CREA FILE DI MANUTEN- 


Punto per punto 
la manutenzione 
ogni 10.000 chilometri 


TABELLA 1 


1. Sostituire filtro aria. 

2. Sostituire olio motore. 

3. Sostituire filtro olio. 

4. Pulire o sostituire filtro carburatore. 

5. Pulire o sostituire candele. 

6. Pulire o sostituire puntine. 

7. Controllare accensione. 

8. Regolare punterie. 

9. Controllare carburatore. 

10. Controllare olio ponte e cambio. 

11. Controllare freni. 

12. Controllare pneumatici. 

13. Controllare assetto ruote. 

14. Controllare raccordi flessibili fluido freni. 
15 Controllare circuito idraulico frizione. 

16. Controllare cinghia ventilatore. 

17. Controllare sistema di raffreddamento. 

18. Controllare apparecchiature elettriche. 

19. Controllare posizione fari. 

20. Controllare tiranti sterzo. 

21. Controllare livelli fluidi. 

22. Controllare valvola sfiato basamento. 

23. Registrare il minimo. 

24. Registrare miscela aria-benzina. 

25. Controllare valvola sfiato basamento. 


Il programma Autopiù è disponibile su dischetto. Per ordinarlo 
utilizzate il tagliando pubblicato nella rubrica Disk Service. Il di¬ 
schetti contiene già memorizzata la tabella riportata qui sopra. 
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ZIONE per cominciare a costituire i 
file di servizio. Questa routine comin¬ 
cia a linea 650. Mentre c’è una subrou¬ 
tine per introdurre un NOME DI FI¬ 
LE AUTO (linea 1960) la funzione di 
questa routine è duplicata alle linee 
670—690 in modo che possa essere im¬ 
pedita la duplicazione dei nomi di file. 
Questo avviene con il comando VE- 


RIFY a linea 700. Se la verifica ha 
esito positivo, il file esiste già e viene 
data all’utente l’opzione di sostituirlo. 
Se non esiste si avrà un errore di FILE 
NOT FOUND e la trappola d’errore 
(linee 170—220) invierà il programma 
a linea 740 per la costituzione del nuo¬ 
vo file. 

La variabile CF$ è usata per il NO¬ 


ME DI FILE AUTO, ed è utilizzata 
per aprire (con OPEN) il nuovo file a 
linea 740. Se il file fosse esistito in 
precedenza, e la sostituzione fosse sta¬ 
ta approvata, la linea 730 lo avrebbe 
cancellato. Viene poi istituita dalla li¬ 
nea 750 la schermata dei DATI DI 
MANUTENZIONE mediante un 
GOSUB alla linea 1570. 


Cinture di 
sicurezza 


Liquido Fluido 

del radiatore de' *' eni 


Livello 

Olio motore Parabrezza 



Serratura 
del cofano 


Sistema di 
aerazione 


Tergicristallo 


errature 


.Collegamenti 

elettrici 


Batteria 


Condotti 

benzina 




Ruote 


■ 
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Routine di input 


Il primo gruppo di routine di input si 
trova alle linee 1950—2100, e consiste 
in: NOME FILE AUTO, PREMI UN 
TASTO QUALSIASI, CHILOME¬ 
TRI, DATA, SCELTA e V) VIDEO 
O S) STAMPANTE. La subroutine 


NOME FILE AUTO a linea 1960 usa 
la variabile VT per determinare dove 
andare con VTAB. Una volta intro¬ 
dotto il nome del file auto CF$ esso 
viene immediatamente controllato a 
linea 1960 per vedere se cominci "ille¬ 
galmente" con un carattere numerico. 
La linea 1970 controlla se ci sia un 
RETURN, in caso affermativo, gene¬ 


ra un POP e toma al menù principale. 
La linea successiva controlla se ci sia la 
stringa di input CATALOG; se la in¬ 
dividua genera il catalogo. 

A linea 1990 il nome di file auto CF$ 
viene confrontato con il vecchio nome 
di file auto CS$. Se CF$=CS$ viene 
generato un RETURN dalla subrouti¬ 
ne, con il bypass del VERIFY e del 


630 B = ABS (A): 1F B < Y OR B > Y + X + 1 THEN 540 
640 VTAB (B - Y « 5): HTAB li PRINT B:R = B: VTAB 21: HTAB 
36: GQSUB 1340: GOSUB 1860:CK1(B,4) = R»(4):CK1(B,6) = 

Ri’6): GOTO 540 

650 REM CREA FILE MANUTENZIONE 

660 HOME : PRINT 'AUTQPIU' - INIZ1AUZZAZI0NE FILE:" 

670 VTAB 3: HTAB 1: CALL - 958: INPUT 'INTRODUCI NOME FILE 
AUTO >‘ :CFì: IF VAL (CFi) < > 0 THEN 670 
680 IF CFi = '■ THEN RETURN 

690 IF CFi = 'CATALOG' THEN PRINT Di :'CATALOG*:VT = 22: GOSUB 
2050: GOTO 660 
700 PRINT Dii'VERIFY':CFi 

710 VTAB 5: HTAB 1: PRINT 'IL FILE ESISTE GIÀ', VUOI S0STIT 
UIRL0? (SA) >':: GET Ai: PRINT Ai: IF Ai = 'N' THEN 6 
60 

720 IF Ai < > ’S’ THEN 710 
730 GOSUB 1890 

740 GOSUB 1840 

750 GOSUB 1570: VTAB 4: 'HTAB i: CALL - 868: PRINT *D) 1NTR 

0DUCI I DATI 0 E) ESCI >';: GET Ai: PRINT Ai: IF Ai = ' 

E’ THEN GOSUB 1530: RETURN 
760 IF Ai < > 'D' THEN 750 

770 F0R J = 1 T0 7: 0N J GOSUB 1610,1640,1660,1690,1720,174 
0,17901 NEXT J 

780 GOSUB 1810: GOSUB !820:CD = VAL (CDi): IF CD ) 0 THEN 
0N CD GOSUB 1610,1640,1660,1690,1720,1740,1790 
790 IF CD ; 0 THEN 780 

800 IF CDi = ’R' THEN R0 = RO + 1:R = R0: GOSUB 1870: GOSUB 
1940: GOTO 750 
810 IF CDi = 'C' THEN 750 

820 IF CDi = 'X' THEN VTAB 21: CALL - 958: PRINT 'VUOI SA 
LVARE I DATI? (S/N) GET Ai: PRINT Al: IF Ai = 'S' THEN 
RO = R0 + !:R = RC: GOSUB 1870: GOSUB ISSO: RETURN 
830 IF Ai = *N“ THEN GOSUB 1880: RETURN 
840 GOTO 780 

850 REM EDITA FILE MANUTENZIONE 

860 HOME : VTAB 2: PRINT ‘EDITA FILE MANUTENZIONE:' 

870 VT = 4: GOSUB 1960 

880 HOME : VTAB 2: PRINT 'MENU' EDITING FILE MANUTENZIONE:' 


390 VTAB 3: HTAB 1: CALL - 958: PRINT 'FILE MANUTENZIONE A 
UTD: ':CFi: VTAB 5: HTAB 1: PRINT '!. CAMBIA DAT! MANUT 
ENZIONt”: PRINT ‘2. AGGIUNGI VOCI MANUTENZIONE*: PRINT 
’3. CANCELLA VOCI MANUTENZIONE': PRINT '4. ELENCO VOCI./ 
DATI MANUTENZIONE 1 ' 

900 VT = 10: GOSUB 2060: IF A < 1 OR A > 4 THEN 900 
910 0N A GOSUB 930,1060,10B0,1230 
920 GOTO 880 

93C REM CAMBIA DATI VOCE MANUTENZIONE 
• 940 HOME : VTAB 2: INVERSE : PRINT ■ CAMBIA DATI MANUTENZIO 
NE:’: NORMAL 

950 VTAB 4; HTAB 1: CALL - 958: VTAB 4: INPUT “INTRODUCI I 

L N. DELLA MANUTENZIONE J'jINiilN = VAL (INi):R = IN: IF 

INI = ” THEN RETURN 
960 IF IN < 1 OR IN ) R0 THEN 950 

970 GOSUB 1570: GOSUB 1930: VTAB 6: HTAB 18: PRINT Sii: VTAB 
3: HTAB 25: PRINT CKi: VTAB IO; HTAB 22: PRINT MB: VTAB 
12: HTAB 30: PRINT ODI: VTAB 14: HTAB 23: PRINT HO» 

980 'VTAB 16: HTAB 25: PRINT DAI: VTAB 18: HTAB IO: PRINT SN 

5; GOSUB 1810 


990 GOSUB 1320:CD = 'VAL (CDi): IF CD > 0 THEN UN CD GOSUB 
16111,1340.1660,1690,1720,1740,1790 
10'lQ IF CD ) 0 THEN 990 

1010 IF CDi = ’R' THEN R = IN: GOSUB 1840: GOSUB 1370: GOSUB 
1910: GOSUB 1940: VTAB 21: HTAB 1: CALL - 95B: PRINT ‘ 
UN'ALTRA? (S/N))’: : SET Ai: PRINT A»:CO» = Al: IF Al = 
■S* THEN 950 

1020 IF CDi = *C* THEN RETURN 

1030 IF CO» = *X* THEN VTAB 21: HTAB I : CALL - 953: PRINT 
■VUOI SALVARE I DATI? (S/N))':: SET Ai: PRINT A»: CO» 


Ai: IF Ai = 


THEN CDi = *R J : GOTO 1010 


1040 IF ODI = 'N* THEN RE T URN 

1050 GOSUB 1310: GOTO 990 

1060 REM. AGGIUNGE VOCE MANUTENZIONE 

1070 GOSUB 1840: GOTO 750 

1080 REM CANCELLA VOCE MANUTENZIONE 

1090 «ME : VTAB 2: PRINT "CANCELLAZIONE VOCE MANUTENZIONE: 

1100 'VTAB 5: HTAB 1: PRINT 'PILE MANUTENZIONE: ':CFI 

1110 VTAB 7: HTAB 1: CALL - 958: INPUT 'INTRODUCI IL N. DE 

LLA VOCE >'jINiilN = VAL (IN»): IF IN» = " THEN 1210 
1120 IF IN < I OR IN ) R0 THEN SUO 
1130 VTAB 9: HTAB 1: PRINT IN :'>';CK»(IN, 1 ) 

1140 VTAB li: HTAB 1: CALL -'368: PRINT 'CONFERMI? (S/N) ) 

’:: GET Al: PRINT Ai: IF Ai = *N' THEN 1110 
1150 IF Al = '' THEN 1210 
1160 IF Ai < > 'S' THEN 1140 
1170 IF IN = RO THEN R0 = R0. - 1: GOTO 1190 

1180 POR I = (IN * 1) TO R0: F0R J = 1 TO 7:CK»((I - 1),J) = 

CK*(I,J): NEXT J: NEXT I:R0 = R0 - 1 
1190 'VTAB 13: HTAB 1: CALL - 868: PRINT 'CANCELLAZIONE AW 
ENUTA - UN'ALTRA? (S/N»';: GET Al: PRINT Ai: IF Ai = ' 

S' THEN 1110 

1200 IF Ai < > "N“ THB( 1190 

1210 GOSUB 1890; GOSUB 1840: GOSUB 1880: GOSUB 1840: POR R = 

! TO RO: GOSUB 1930 
1220 GQSUB 1870: NEXT R: RETURN 
1230 REM ELENCO VOCE DATI MANUTENZIONE 
1240 VTAB 5: HTAB 1: CALL - 958: PRINT U. STAMPA ELENCO V 
OC! MANUTENZIONE': PRINT "2. STAMPA DATI VOCI MANUTENZI 
ONE': PRINT ’3. STAMPA ELENCO OPERAZIONI' 

1250 VT = IO: GOSUB 2060: IF A < 1 OR A > 3 THEN 1250 

1260 UN A GOTO 1280.1340,1440 

1270 REM ELENCO INDICE VOCI fMNUTENZICNE 

1280 VT = 10: GQSUB 2080 

1290 IF Pi = *S' THEN PRINT SPC( 5);"INDICE VOCI MANUTEN2 
IONE:" 

1300 VTAB 5: HTAB !: CALL - 958:X = 0: F0R I = 1 T Q SO: PRINT 

SPC< 5);];'. ';CKÌ(I.1):X = X * 1: IF X = 15 AND Pi = 

’V THEN X = 0:VT = 22: GOSUB 2050: VTAB 5; HTAB 1: CALL 
- 955 

1310 NEXT I: PRINT CHRi (12): PRINT Di;'PR#0':VT = 22: GOSUB 
2050: GOTO 1240 

1320 VT = 22: GOSUB 2050: GOTO 1240 
1330 REM ELENCO DATI MANUTENZIONE 

1340 VTAB 5: H T AE I: CALL - 959: INPUT 'INTRODUCI IL N. DE 
LLA MANUTENZIONE >";NÌ:N = VAL (Ni): IF N < 1 OR N > R 
0 THEN 1240 

1350 VT = 7: GOSUB 2030; VTAB 5: HTAB 1: CALL - 958: PRINT 
SPC( 5);'MANUTENZIONE N.'jN 

1360 PRINT : PRINT SPC( 5);'MANUTENZIONE: ' ;CK*<N,1): IF C 
K»(N,2) = 'C* THEN PRINT : PRINT SPC( 5);'CAMBI0 OGNI 

1370 !/ CK»(N,2) = *1' THEN PRINT : HTAB 6: PRINT 'ISPEZ.O 
GNI ': 

1380 PRINT CK»(N,3);* CHILOMETRI,': PRINT SPC( 5);'0 ';CK1 
(N,5):' MESI. ': 

1390 IF CK1(N,2) = *C' THEN PRINT 'CAMBIO AVVENUTO ’ 

1400 IF CKKN.25 = "I" THEN PRINT ‘ISPEZIONE AVVENUTA ' 

1410 PRINT SPCC 5);'IL ':CK»<N.é);' A ':CKÌ(N,4):’ KM.': PRINT 
: PRINT SPC( 5)j* NOTE: 'jCK»(N,7): PRINT CHRl (12): PRINT 
Di;'PR#0" 

'.420 VT = 22: GOSUB 2050: GOTO 1240 

1430 REM SOMMARIO FILE MANUTENZIONE 

1440 HOME : VTAB 2: PRINT *SOW«RiO FILE MANUTENZIONE:*iVT = 

4: 00SUB 2080: IF Pi = 'V THEN 1430 
1450 PRINT SPC< 2);'S0MMARI0 FILE MANUTENZIONE: ":CFI: PRINT 
: PRINT 3PC( 2);'N./ VOCE': SPCC I4):‘C/1‘; SPC( 2):“D 
ATA“; SFC( 5)j’KM.“; 3PC( 53;“MESI'j SPC( 3); §PC( 
6):'NOTE': PRINT 

1460 POR I = 1 TO R0: PRINT SPCC 23;I;*-*;CKI(1,1) ; : POKE 

Continua 
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READ del dischetto di linea 2000. 
Questo bypass elimina gli accessi non 
necessari al dischetto, dato che il FILE 
DI MANUTENZIONE desiderato è 
già in memoria. Prima di lasciare que¬ 
sta subroutine si imposta CS$ al valore 
di CF$, al fine di predisporre il bypass 
per la volta successiva. 

La sola altra routine di input isolata 
è quella degli input dei DATI DI MA¬ 
NUTENZIONE, situati alle linee 
1610-1800. La routine è stata ideata 
per separare i complessi input di scher¬ 
mo occorrenti per la schermata di in¬ 
troduzione dei DATI DI MANU¬ 
TENZIONE. Poiché i dati introdotti 
dall’utente avrebbero avuto la forma 
di CHILOMETRI, LETTURE DI 
CONTACHILOMETRI e DATA si 
sarebbe potuto scrutinare rigorosa¬ 
mente l’arco delle risposte previste, 
allo scopo di ridurre gli errori di im¬ 
missione. 

I due soli input a "testo libero" sono 
VOCI DI MANUTENZIONE e NO¬ 
TE EVENTUALI (linee 1610 e 1790). 
L’unica restrizione posta a queste im¬ 
missioni è consistita nel limitarle a 20 
caratteri. 

Le routine 
del dischetto 

Le routine del dischetto sono situate 
alle linee 1830—1910, e consistono 
fondamentalmente nelle istruzioni 
OPEN, READ, WRITE, CLOSE e 
DELETE necessarie per accedere ai 
FILE DI MANUTENZIONE sul di¬ 
schetto. La struttura del file sul di¬ 
schetto è quella di un file di testo ad 
accesso casuale con una lunghezza di 
record di 87, e con il Record 0 che 
contiene il numero delle voci del file. 

Con le routine del dischetto predi¬ 
sposte come subroutine basta sceglier¬ 
le come si farebbe sul menù di un risto¬ 
rante per ottenere qualsiasi azione ne¬ 
cessaria del dischetto. La routine del 
dischetto situata a linea 1900 è la sola 
routine speciale, nel senso che legge 
l’intero file di servizio mettendolo nel¬ 
la matrice bidimensionale (CK$). 

Introduzione 
dei dati di servizio 

A linea 750 è stata inserita un’inter¬ 
rogazione D) DATI o E) ESCI per 
evitare all’utente di dover introdurre 
dati falsi solo per arrivare alla linea di 
ritorna al MENÙ con X. Dopo una 
risposta D) DATI viene impiegato un 


loop FOR a linea 770 per inviare l’u¬ 
tente alle sette risposte richieste, tra¬ 
mite un’istruzione ON GOSUB. Que¬ 
ste subroutine sono gli input dei DATI 
DI MANUTENZIONE situate alle li¬ 
nee 1610—1790. Ognuna delle sette 
subroutine si interfaccia con la scher¬ 
mata di introduzione dei dati di servi¬ 
zio, in modo di non distruggerla. Inol¬ 
tre ogni subroutine ha i propri control¬ 
li per contribuire a ridurre al minimo 
gli errori di immissione. 

Una volta che le sette risposte sono 
state raccolte, il programma permette 
di editare, registrare, cancellare o 
uscire, nella linea 780, richiamando 
una subroutine di input a linea 1820. 
Quando si sta editando vengono utiliz¬ 
zate le stesse routine di input (linee 
1610—1790) per raccogliere la risposta 
corretta. Una risposta C) per cancella¬ 
re rinvia il programma alla linea 750 
per ricominciare. 

La risposta R) per registrare o X) 
per uscire con SAVE manda le sette 
risposte al dischetto' e alla matrice 
CK$. Un X) senza SAVE rimanda al 
menù principale senza disturbare il di¬ 
schetto o la matrice CK$. Quando un 
R) ha completato la memorizzazione 
dei dati va alla linea 750 per continua¬ 
re ad accettare dati di servizio. 

La successiva subroutine importan¬ 
te contiene le capacità di editing e di 
elencazione che permettono di CAM¬ 
BIARE DATI DI MANUTENZIO¬ 
NE, AGGIUNGERE E CANCEL¬ 
LARE VOCI DI MANUTENZIO¬ 
NE e LISTARE FILE/VOCE/DATI. 
Queste routine sono situate nelle linee 
850—1520, e costituiscono quasi un 
terzo del programma. La routine 
CAMBIARE DATI DI MANUTEN¬ 
ZIONE non fa che usare le routine di 
predisposizione della schermata e di 
input (linee 1570-1630) per visualiz¬ 
zare una VOCE DI MANUTENZIO¬ 
NE prescelta e i dati a essa relativi. Per 
editare le risposte originali viene uti¬ 
lizzato lo stesso metodo usato per 
cambiare i dati. Le linee 970—980 pre¬ 
dispongono la schermata e i vecchi da¬ 
ti, mentre la linea 990 controlla il cam¬ 
biamento, in modo identico alla linea 
780. 

Quando tutti i cambiamenti sono 
stati completati, i dati vengono inviati 
alla matrice e al dischetto. La linea 
1940 è la subroutine che dispone i dati 
nella matrice CK$. L’aggiunta di voci 
di servizio è risultata semplice: basta 
aprire con OPEN il FILE DI MANU¬ 
TENZIONE (linea 1070) e poi andare 
alla subroutine di input originale a li¬ 
nea 750. La cancellazione si ottiene 
procurandosi un numero di voce di 


servizio (linea 1110) e poi la conferma 
(linee 1140—1160). Una volta avuta la 
conferma, le linee 1170-1180 chiudo¬ 
no la matrice CK$ sulla voce di servi¬ 
zio cancellata. Si possono cancellare 
varie voci senza un aggiornamento del 
dischetto indicando S) per SI’ in rispo¬ 
sta alla domanda "UN’ALTRA?" di 
linea 1190. Una risposta negativa fa sì 
che il programma aggiorni il dischetto 
e poi si torni al MENU’ DI EDITING. 

L’elencazione si compie nelle linee 
1230-1520. L’opzione LISTA INDI¬ 
CE VOCI DI MANUTENZIONE co¬ 
mincia a linea 1270, e visualizza o 
stampa tutti i nomi di voci di manuten¬ 
zione (memorizzati nella matrice CK$ 
(1,1) in modo che si possa individuare 
il numero esatto corrispondente a una 
specifica voce di manutenzione. L’op¬ 
zione LISTA DATI DI MANUTEN¬ 
ZIONE (linee 1330—1420) stampa sul 
video o su carta le sette voci di dati di 
una voce di servizio scelta dall’utente. 
Si può ottenere anche una lista com¬ 
pleta delle operazioni di manutenzio¬ 
ne (linee 1430—1520) sullo schermo o 
sulla stampante. 

Scadenze 

manutenzione 

La subroutine LISTA OPERA¬ 
ZIONI DI MANUTENZIONE (linee 
230—430) è l’anima del programma: 
senza di essa il programma non ha ra¬ 
gione d’essere. Ci si procura a linea 
250 il nome di file auto (CF$), insieme 
con l’attuale lettura del contachilome¬ 
tri (OD$) e la data corrente (DA$). 
Un loop passa per ogni voce di servi¬ 
zio, confrontando la differenza delle 
letture del contachilometri (OD) con i 
chilometri dopo i quali è consigliato il 
servizio (MI$) (linea 300), e confron¬ 
tando la differenza in mesi fra la data 
presente (DA$) e la data dell’ultimo 
servizio (CK$ (N, 6) in mesi con i mesi 
dopo i quali è raccomandata la manu¬ 
tenzione (CK$ (N, 5). 

Se sono stati superati i chilometri o i 
mesi dopo i quali è raccomandato il 
servizio, il programma passa alla linea 
360 per visualizzare o stampare quella 
voce di servizio come voce per la quale 
è tempo di manutenzione. Le linee 
360—430 provvedono a formattare il 
video o la stampa in conformità con 
l’impostazione di P$ nella subroutine 
2080. 

Nelle linee 280, 320 e 330 viene 
compiuto un certo intrappolamento 
d’errore, per evitare erronee elenca¬ 
zioni delle scadenze di manutenzione. 
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36,25; PRIMI CK$<1,2); SPCi 3):CK$i!,6); SPC( 45;CK$<I, 
4);; POKE 36,47; PRINT CK1(Ì,5);; POKE 36,53 
PRIMI CK$(I.3);: POKE 36,59: PRINT CK$(I.7): NEXT 1; PRINT 
CHR$ (12): PRINT Mj’PRttO*: GOTO 1520 
HOME :X = 0: FOR I = 1 TO 40: PRINT NEXT I: FOR 
I = 1 IO RO: PRINT ‘SERY.N.* ;1 :* - *:CK$ÌI.l): PRINT *D 
ATA SERM.- ■:CK$(I,6):‘ * KM,PERCORSI - *;CK$(i 1 4> 

PRINT "KM.SERV. -*;CK$(1,3)* MESI SERV. ;CK^(1,5) 
PRINT *N0TE:*:CK$(L7.);’ * STATO - *:CK$(1,2>: FOR J = 

1 TO 46: FRINÌ “**:: NEXT J 

1500 X = X+ 1: IFX=4 THEN VT = 22: GOSOB 2050:X = 0: HOME 
: FOR J = ! TO 40: PRINT "**j: NEXT J 
NEXT IsVT = 22: GOSOB 2050 

MONE : VTAB 2: PRINT 'FILE MANUTENZIONE:*i PRINT ‘FILE 
MANUTENZIONE AUTO: *;CF$: GOTO 1240 
REM CONTROLLA SE R0=0 
IF RO > 0 THEN GOSUB 1880: RETURN 
VTAB 4: HTAB 1: CALL - 958: VTAB 5: PRINT 'ERRORE! - 
NESSUN DATO NEL PALI AUTO!" 

PRINT : PRINT "IL FILE MANUTENZIONE ":CF$:* VIENE CANC 
ELlATO* :VT = 22: GOSUB 1890: GOSUB 205(1: POP : RETURN 
REM ROUTINE SCHERMATA VOCI NMTENZIONE 
VIAB 2: HTAB 1: CALL - 958: PRINT "FILE MANUTENZIONE 
AUTO: ";CF$: 'VTAB 6: HTAB 1: PRINT *1. MANUTENZIONE:*: VTAB 
8: HTAE 1: PRINT "2. DAMBID7 I > SPEZIONE : * : VTAB 10: HTAB 
1: PRINT *3. KM, MANUTENZIONE:* 

VTAB 12: HTAB 1: PRINT *4. LETTURA KM. (ULTIMA C/I):*: 

VTAB 14: HTAB 1: PRINT *5, MESI MANUTENZIONE:*: VTAB 1 
6: HTAB 1: PRINT *6, OATA(ME/AN-ULT.C7I):* 

1600 VTAB 18: HTAB 1: PRINT ‘7. NOTE;*: RETURN 

1610 VTAB 6: HTAB 18: CALL - 866: FOR I = 1 TO 20: PRINT CHI» 


1470 

1480 


1485 

1490 


1510 

1520 

1530 

1540 

1550 

1560 

1570 

1580 


1590 


HTAB 18: INPUT "*;S1$: IF SI* = ** THEN 


(95);: NEXT 
1610 

1620 IF LEN (S!$) > 20 THEN 1610 
1630 RETURN 

1640 VTAB 8: HTAB 25: CALL - 868: GET CK$: PRINT CK$: IF C 
K$ < > *1* AND CK$ < > *C" THEN 1640 
1650 RETURN 

1660 'VTAB 10: HTAB 22: CALl - 3ó8: INPUT ” ;MI$: IF LEN < 
MI») > 5 THEN 1660 
1670 IF 'VAL <MI$) < 1000 THEN 1660 
1680 RETURN 

1690 'VTAB 12: HTAB 30: CALL - 868: INPUT ”jOD$: IF LEN ( 
00$) > 6 THEN 1690 

1700 00 = VAL (OD$):OD$ = STR$ (QO): VTAB 12: HTAB 30: CALL 
- 368: FRINÌ OD$: IF OD < 1 THEN 1690 
:?10 RETURN 

1720 'VTAB 14: HTAB 23: CALL - 868: INPUT **jMO$: IF VAL ( 
NO$) < ! THEN 1720 
1730 RETURN 

1740 VTAB 16: HTAB 25: CALL - 868: INPUT *‘;DA$: IF LEN ( 
DA$) ( > 5 THEN 1740 

1750 IF M1D$ <DA$.3,1> < > V* THEN 1740 
1760 YR = VAL ( RIGHT$ <DA$.2»: IF YR < 1 THEN 1740 
1770 MO = VAL ( LEFT$ (OA$,2)): IF MO < 1 OR MO > 12 THEN 1 
740 

1780 RETURN 

1790 VTAB 18: HTAB 10: CALL - 863: FOR I = 1 TO 20: PRINT 
CHR$ (95):: NEXT I: HTAB 10: INPUT *";SN$: IF LEN (SN 


$) > 20 THEN 1790 
1800 RETURN 

1810 ‘VTAB 21: HTAB 1: PRINT *1-?=C#!BIARE, R=REGISTRARE *: PRINT 
*C=CANCELLARE, X=USCIRE )*: RETURN 
1820 VTAB 22: HTAB 28: CALL - 868: GET CO$: PRINT CD$: RETURN 
1830 REM ROUTINE DATI SU DISCO 
1840 PRINT D$;*0PEN*;CF$:* 1 L87 I : RETURN 
1850 PRINT D$!“READ*;CF$i*,R0‘: INPUT R0$:R0 = VAL (R0$): PRINT 
D$: RETUH1 

1860 PRINT 0$;*READ‘:CF$:*,R“:R: FOR II = 1 TO 7: INPUT R$< 
li): NEXT II: PRINT D$: RETURN 

1870 PRINT B$:*URITE*:CF$;’ R*;R: PRINT Sl$: PRINT CK$: PRINT 
MI$: PRINT OD$: PRINT M0$: PRINT DA$: PRINT SN$: PRINT 
D$: RETURN 

1880 PRINT D$:*WRITE*;CF$;\RO‘: PRINT STR$ (RO): PRINT 0$ 
;"CL03E":CF$: RETURN 
1890 PRINT D$:*DELETE*;CF$: RETURN 
1900 RO = 0: GOSUB 1840: 6DSUB 1850: FOR R = 1 TO RO: GOSUB 

1860: FOR I = 1 TO 7:CK$(R.l) = R$(I): NEXT I: NEXT R: PRINT 
D$:‘CL0SE":CF$: RETURN 
1910 PRINT D$: CLOSE*:CF$: RETURN 
1920 REM ROUTINE MATRICI DATI 

1930 S!$ = CK$(S,1):CK$ = CK$(R.2):MI$ = CK$(R,3):0D$ = CK$( 
R,4):M0$ = CK$(R,5):DA$ = CK$(R,6):SN$ = CK$(R,7): RETURN 
1940 Ck$(R,l) = S1$:CK$(R,2) = CK$:CK$(R,3) = H!$:CK$(R,4) = 
0D$:CK$(R,5) = MO$:CK$(R,6) = DA$:CR$(R,7) = SN$: RETURN 


1950 REM ROUTINE DI INPUT 

I960 VTAB VT: CALL - 863: INPUT ‘INTRODUCI NOME FILE AUTO 
)* :CF$: IF 'VAL <CF$> > 0 THEN 1960 
IF CF$ = ** THEN POP : RETURN 
IF CF$ = ‘CATALOG* THEN PRINT 0$;"CATAL06":V = VT:VT = 

22: GOSUB 2050:VT = V; GOTO 1960 
IF CF$ = CS$ THEN RETURN 
2000 CS$ = CF$: PRINT D$:*VERIFY*:CF$: GOSUB 1900: RETURN 
2010 'VTAB VT: CALl - 868: INPUT 'INTRODUCI DATA MANUTENZIB 
NE (ME/AN) >* :DA$: IF LEN (DA$) < > 5 OR VAL (DA 
$) <1 OR VAL (DA$; > 12 THEN 2010 
IF VAL ( RIGHT$ (DA$,2)) < 1 THEN 2010 
VTAB VT * 2: HTAB 1: CALL - 868: INPUT “INTRODUCI LET 
TURA KM. MANUTENZIONE >";OD$:OD = VAL (OD*): IF 0 
D < 1 THEN 2030 
RETURN 

‘•VTAB VT ♦ 1: HTAB 5: CALL - 958: PRINT * (PREMI UN TAS¬ 
TO PER CONTINUARE)*:: GET A$: PRINT : RETURN 
VTAB VT: HTAB 1: CALL - 868: PRINT ‘SCEGLI )*:: GET A 
$: FRINT A$;A = 'VAL (A*): IF A$ = CHR$ (13) OR A$ = CHR* 
(27) THEN POP 


1970 

1980 

1990 


2020 

2030 


2040 

2050 

2060 


2070 RETURN 

2080 'VTAB 'VT: HTAB 1: CALL - 868: PRINT *V)IDEO 0 SITAMPFN 
TE? )*:: GET P$: PRINT P$: IF P$ < > *S" AND P$ < ) * 

V" THEN 2080 

2090 IF P$ = *S* THEN PRINT D$j*PRM*: PRINT CHR$ (9);*80 

2100 RETURN 
2110 REM TITOLO 

2120 TEXT : HOME : VTAB 8: HTAB 13: PRINT *A U T 0 P I U '* 

: VTAB 10: HTAB 12: PRINT *BY WOODY ADAMSON*: VTAB 14: HTAB 
11: PRINT 'COPYRIGHT 1985 BY': VTAB 16: HTAB 8: PRINT * 
APPLICANDO i MICROSPARC" :'VT = 22: GOSUB 2050: RETURN 


La linea 280 intrappola le letture cor¬ 
renti del contachilometri inferiori alla 
lettura fatta all’epoca dell’ultimo ser¬ 
vizio. La linea 320 intrappola qualsiasi 
data con un anno inferiore all’ultimo 
anno di manutenzione registrato, e la 
linea 330 intrappola qualsiasi data con 
un mese inferiore all’ultimo mese di 
manutenzione (gli anni devono essere 
uguali). Viene segnalato all’utente in 
quale voce di servizio c’è l’errore, e 
poi si torna al menù principale. 

Aggiornamento 
contachilometri e data 

La subroutine AGGIORNA CON- 
TACHILOMETRI/DATA permette 
di cambiare la lettura del contachilo¬ 


metri (OD$) e la data (DA$) nella 
matrice CK$. Un’esclusiva routine di 
schermata consente la facile conferma 
visiva delle voci da aggiornare. 

Le linee 490—510 visualizzano sullo 
schermo un massimo di 15 voci di ser¬ 
vizio (CK$ (I, 1)) e poi chiamano la 
routine 530. Nell’ambito di questa su¬ 
broutine si introduce un numero di vo¬ 
ce di servizio, e poi questo numero 
viene messo in campo inverso sullo 
schermo dalla linea 610. Se viene indi¬ 
viduato un numero negativo (linea 
550), il numero della voce di servizio 
viene riportato in campo normale (li¬ 
nee 610—640) e i vecchi dati vengono 
recuperati dal dischetto da un GO¬ 
SUB 1840. 

Le linee 570—600 sono le trappole 


di errore per la lettura del contachilo¬ 
metri, il mese e l’anno. Se viene indivi¬ 
duato un errore ne viene data segnala¬ 
zione all’utente. Il programma non 
permette di aggiornare una voce di 
servizio se la lettura del contachilome¬ 
tri o la data sono inferiori all’ultima 
lettura registrata o alla data dell’ulti¬ 
ma manutenzione. Quando tutti gli 
aggiornamenti sono completi, la linea 
520 trasferisce sul dischetto la matrice 
aggiornata e ritorna il controllo al me¬ 
nù principale. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

- K 
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Volete trasformare una parola, una frase, un disegno, 
un grafico, in un poster gigante, in uno striscione da 
appendere al muro? Facilissimo, basta... 
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L e possibili applicazioni di giganto¬ 
grafie che riportano grafici finan¬ 
ziari, disegni tecnici, o semplicemente 
disegni artistici, sono praticamente in¬ 
finite e, nella maggior parte dei casi, di 
sicuro successo. Ma è anche possibile 
ottenere poster da disegni particolar¬ 
mente riusciti, da attaccare alla parete 
come arredamento o per addobbare le 
pareti di una stanza per una festa, sen¬ 
za preoccuparsi che possano poi veni¬ 
re rovinati: tanto è un attimo ristam¬ 
parli. 

Come funziona 

Scritto in applesoft per permettere 
un’eventuale personalizzazione da 
parte dell’utente, il programma, dopo 
aver chiesto se la figura da stampare è 
già in memoria, comincia a scandaglia¬ 
re la pagina grafica, partendo dall’an¬ 
golo in basso a sinistra e procedendo 
verso l’alto. Per ogni valore, esegue un 
controllo per verificare se il pixel cor¬ 
rispondente è acceso o spento. Se il 
pixel risulta spento (su schermo mono¬ 
cromato si vede nero), salta alla su¬ 
broutine del carattere, in questo caso 
un asterisco, altrimenti salta a quella 
del carattere spazio. Se si stampasse 
un carattere per ogni pixel acceso e 
uno spazio per ogni pixel spento, si 


otterrebbe una hard copy negativa ri¬ 
spetto alla figura dello schermo. Nel 
caso si volesse di proposito un negati¬ 
vo della figura da stampare, è suffi¬ 
ciente invertire le linee 940 e 960 e le 
linee 950 e 970. Il LOMEM della linea 
230 protegge la prima pagina grafica 
dal programma, che potrebbe andare 
a influenzare e rovinare la figura in 
memoria. 

Il programma è predisposto per fun¬ 
zionare con due stampanti diverse, la 
Apple imagewriter e la Epson mx 80, 
ma è facilmente adattabile a qualsiasi 
altra stampante, modificando oppor¬ 
tunamente le linee 470—480 oppure le 
linee 500—510. In queste linee viene 
infatti settata la stampante per poter 
ottenere i caratteri compressi e lo spa¬ 
zio interlinea dimezzato. Nel caso si 
disponesse di una stampante a 132 co¬ 
lonne si cosiglia di cancellare le linee 
dalla 400 alla 520, ottenendo cosi una 
stampa leggermente più grande. 

Se la stampa dovesse risultare trop¬ 
po chiara, sarà sufficiente settare la 
stampante con l’apposito comando di 
EMPHASIZED (scrittura passata 
due volte). 

Le dimensioni di stampa sono sola¬ 
mente due, per rendere il programma 
più corto da digitare, più semplice da 
controllare ma soprattutto più veloce. 


Se lo si volesse modificare per ottene¬ 
re stampe ancora più grandi, basta 
modificare i loop di SCAN e S1CAN e 
incrementare adeguatamente la varia¬ 
bile SP. 

Attenzione a non esagerare con le 
dimensioni della figura, a rischio di 
non ottenere una risoluzion grafica del 
tutto sodfdisfacente. 

Poiché il programma è stato scritto 
in basic, risulta un po’ troppo lento se 
viene usato con una stampante senza 
buffer di memoria, mentre con le 
stampanti Apple, provviste di buffer, 
il tempo di stampa si riduce notevol¬ 
mente. Per chi avesse a disposizione 
un compilatore, è cosigliabile trasfor¬ 
mare il programma in linguaggio mac¬ 
china, per aumentare al massimo l’ela¬ 
borazione dei dati. 

Una volta terminata la stampa, oltre 
al lavoro di incollare i fogli tra loro, è 
bene spegnere la stampante per qual¬ 
che secondo, in modo da resettarla e 
togliere ogni tipo di programmazione 
e quindi farla tornare al suo normale 
funzionamento. 

Carattere di stampa 

Il carattere di stampa che viene uti¬ 
lizzato per sostituire il pixel è un aste- 
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Listato 


1 00 

REM 

********************* 

HO 

REM 

* 

* 

120 

REM 

* POSTER DA SCHERMO 

* 

130 

REM 

* 

* 

140 

REM 

* by Alberto Rossi 

* 

150 

REM 

* 

* 

160 

REM 

* f or 

* 

170 

REM 

* 

* 

180 

REM 

* Applicando 

* 

190 

REM 

* 

* 

200 

REM 

* 20-1-85 

* 

210 

REM 

* 

* 

220 

REM 

********************* 

230 

LOMEM: 16384 


240 

DIM DG(133) 


250 

VA = « 

S:X = O:ST$ = "":CB 

= < 


se = 

0 :SP = 0 


260 

REM 

— 


270 

REM 



280 

REM 

Carica la figura e 


290 

REM 

dimensiona stampa 


300 

REM 




REM 



320 

TEXT 

: HOME ; INPUT "La 

f Ìi 


ra é 

già in memoria ? 

R$ 


LEFT$ (R$,l) < > "N" THEN 

380 

330 FRINT : INPUT "Slot ";SS: FRINT 
: INPUT " Drive ";DD : FRINT 
: INPUT "Vuoi vedere il cata 
log del disco ? "jR$: IF LEFT$ 
(R$,1) < > "S" THEN 350 

340 FRINT CHR$ <4>5"CATALOG,S"5 
SS;",D";DD 

350 PRINT : INPUT "Nome figura d 

a stampare ? ";N$: PRINT : PRINT 
"Inserire la figura nel driv 
e ";DD: INPUT “e premere Ret 
urn ";R$ 

360 F'R I NT CHR$ < 4 ) ; " BLOAD " ; N$ ; ” 

,A*2000" 

370 HOME 

380 PRINT : PRINT "Possibilità d 

i stampa del disegno PRINT 

: PRINT " 1) stampa gigante 

(2 pezzi)": PRINT " ”2) sta 
mpa supergigante <3 pezzi)": 


INPUT " Su 

ale ? a o 2 ) ";SP 

390 PRINT : PRINT “Su che stampa 
nte ?": PRINT : PRINT " i) 
Apple image writer": PRINT 
" 2) Epson m>: 80": INPUT " 

Quale ? (1 o 2)";ST 
400 REM ================== 

410 REM 

420 REM Setta la stampante 
430 REM 

440 REM ================== 

450 PR# 1 

460 ON ST GOTO 470,500 
470 PRINT CHR$ (27) + "Q" 

480 PRINT CHR$ (27) + "T" + "10 

II 

490 GOTO 520 

500 PRINT CHR$ (15) 

510 PRINT CHR$ (27); CHR$ (65); 

CHR$ (5 - SP) 

520 PR# O 

530 REM ================== 

540 REM 

550 REM Scandaglia schermo 
560 REM 

570 REM ================== 

580 HOME 

590 FOR X = O TO 39 

600 IF SP < > 2 THEN 650 

610 FOR 3CAN = 9088 + X TO 8192 + 

X STEP - 128: FOR S1AN = 71 
68 TO O STEP - 1024:DG(VA) = 
PEEK (3CAN + SIAN); VA = VA + 

1: NEXT SiAN,SCAN 
620 GOSUB 730 

630 NEXT X: PR# 1: FOR SO = 1 TO 

30: PRINT : NEXT SO: FR# O: FOR 
X = 0 TO 39 

640 IF SP < >2 THEN 690 

650 FOR SCAN = 9128 + X TO 8232 + 

X STEP - 123: FOR S1AN = 71 
68 TO O STEP - 1024:DG(VA) = 
PEEK (SCAN + SIAN): VA = VA + 

1: NEXT 31AN,SCAN 
660 IF SP < > 2 THEN 61O 

670 GOSUB 730 

680 NEXT X: PR# 1: FOR SO = 1 TQ 

30: PRINT ; NEXT SO: PR# 0: FOR 


risco, ma può essere usato un qualsiasi 
altro carattere, cambiandolo nelle 
stringhe delle righe 940 e 950. Il tipo di 
carattere permette di modificare il 
contrasto della figura. 

A ogni pixel della colonna analizza¬ 
to, il programma provvede ad aggior¬ 
nare la stringa della linea 980 che, una 
volta terminata, verrà stampata per in¬ 
tero una o due volte a seconda delle 
dimensioni. 


Per problemi di spazio, il program¬ 
ma esegue la stampa su due o tre stri¬ 
sce di carta, a scelta, (si potrebbero 
portare fino a 192), automaticamente. 

Il programma 

100—220 Titolo, programmatore e da¬ 
ta. 

230 Definisce l’indirizzo di memoria 
più basso disponibile dal programma. 


240 Dimensiona il vettore DG che rap¬ 
presenta i valori di una colonna. 

250 Azzeramento variabili. 

260—320 Chiede se la figura da stam¬ 
pare è già in memoria; in caso afferma¬ 
tivo, salta alla linea 380. 

330 Chiede lo slot e il drive dal quale 
deve caricare la figura e chiede se si 
vuol vedere il catalogo del disco; se la 
risposta è negativa, salta a 350. 

340 Mostra il catalogo del disco. 
350—360 Chiede il nome della figura 
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X = 0 TO 39 

690 FOR SCAN = 9168 + X TO 3272 + 
X STEP - 128: FOR S1AN = 71 
68 TO O STEP - 1024:DG(VA) = 
PEEK (SCAN + SIAN): VA = VA + 
1: NEXT SIAN,SCAN 


700 

GOSUB 73© 


710 

NEXT 

X 


72© 

END 



730 

REM 



740 

REM 



750 

REM 

Crea la stringa 


76© 

REM 

da stampare 


770 

REM 



780 

REM 

li 

1! 

li 

il 

il 

II 

il 

li 

li 

il 

li 

il 

II 

II 

ii 


790 

FOR 

Il = © TO 6 


800 

FOR 

CA = © TO VA - 1 


810 

IF DG(CA) = INT (DG(CA) / 

2 


) * 

2 THEN ON SP GOSUB 97C 



960; 

GOSUB 980: GOTO 830 


82© 

ON S 

P GOSUB 950,940: GOSUB 

9 


80 

830 DG(CA) = INT (DG(CA) / 2): NEXT 
CA: GOSUB 104©: NEXT II 
84© VA = 0 

85© FOR I = 1 TO 10: FRI NT : NEXT 
360 RETURN 
870 END 

890 REM 


900 REM Sci egli e il carattere 
910 REM da stampare 
920 REM 

930 REM ===================== 

940 A4 = "**": RETURN 
950 A* = RETURN 

960 A4 = " RETURN 

970 A4 = " ": RETURN 
980 ST4 = ST4 + A4: RETURN 


990 REM =============== 

1000 REM 

1010 REM Stampa una riga 
1020 REM 

103© REM =============== 

1040 F'R# 1 

1050 FOR I = 1 TO SP: PRINT ST4: 

NEXT I:ST4 = "" 

1060 F'R# 0 
1070 RETURN 



da caricare in memoria e la carica. 
380 Chiede le dimensioni della stam¬ 
pa. 

390 Chiede il tipo di stampante a di¬ 
sposizione. 

400—520 Setta la stampante. 

530—710 Scandaglia lo schermo e cari¬ 
ca il vettore DG. 

720 Fine. 

730-870 Subroutine per la creazione 
della stringa. 

880—980 Subroutine per la scelta del 


carattere da stampare e aggiornamen¬ 
to della stringa ST$. 

990—1070 Subroutine per la stampa 
della stringa ST$ una volta che è com¬ 
pleta. 

Alberto Rossi 


Questo programma è disponibile su di¬ 
schetto. L'elenco, i prezzi e le modalità 
d’ordine di questo e degli altri dischetti 
disponibili sono riportati nella rubrica 
Disk Service. 

- 


fi 



all'altezza 
dei tuoi problemi 



( Acquistare un computer non è 
sufficiente a risolvere i tuoi pro¬ 
blemi. Devi acquistare quello più 
idoneo all'uso che devi farne. 
Computer Center: la più vasta 
gamma di computer per una 
scelta migliore • validissimo 
team di analisti programmatori a 
tua completa disposizione • tutte 
le periferiche e accessori • corsi 
di formazione professionale • 
Software House. 

Computer 
Center 

VENDITA - ROMA 
Via Nizza, 48/50/52 
Tel. 844.84.18-86.38.39 

Via Nizza, 26/28/30/32 

Tel. 844.80.22-85.79.57 
ViaSoana(P.za Tuscolo). 24/26/28 
Tel. 759.15.44-759.27.90 
Via Prati Fiscali, 257/257a/257b 

Tel. 810.17.60 

ASSISTENZA TECNICA -ROMA 
Via Terni, 86/86a/86b 
Tel. 757.89.36 
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C’è un percorso di golf, in qualche parte 
del mondo, che vi piace in modo 
particolare? Con questo programma 
potete ricrearlo sull’ Apple, 
memorizzarlo su dischetto e giocarci 
tutte le volte che vorrete con 
i vostri amici. 


DOS 3.3 

+11 II 

ProDOS 

+1111 

1 APPLE //e 

+1111 

APPLE 7/t 

+1111 



C erto che l’idea di poter creare sul 
computer un proprio campo di 
golf affascina non poco. Magari con la 
possibilità di cancellarlo dal dischetto, 
una volta che si siano padroneggiate le 
sue difficoltà, per sostituirlo con un 
nuovo percorso. Golf utilizza figure e 
grafica in alta risoluzione per realizza¬ 
re esattamente questo scopo. 

Creazione 
del percorso 

Potete progettare a vostro piaci¬ 
mento le caratteristiche di ciascuna 
buca del percorso, collocare tee e 
green in qualsiasi punto del monitor e 
inserire nello schema quanti alberi, 
rough, bunker e ostacoli d’acqua desi¬ 
derate. I rough e i bunker possono 
essere grandi quanto si vuole. 

Potete inoltre rifinire il percorso e 
spostare ogni figura fino a che sarete 
del tutto soddisfatti. 

L’immagine definitiva di ogni buca 
viene salvata su dischetto per poterci 
giocare ancora. Il computer aiuta per¬ 
fino a determinare la distanza e il par 
di ciascuna buca. 

Svolgimento del gioco 

Quando si esegue per la prima volta 
il programma, si avrà il menù della 
figura 1. Prima di poter giocare dovete 
creare un percorso, quindi scegliete 
l’opzione 3, che permette di eseguire il 
programma CREARE, nel quale si fa 
uso sia di testo sia di Hi—Res per pro¬ 


gettare ciascuna buca. Dato che le in¬ 
formazioni per ogni buca sono memo¬ 
rizzate sia in un breve file di testo di 2 
settori sia in un file binario (immagi¬ 
ne) di 34 settori, dovete essere certi di 
avere abbastanza spazio sul dischetto 
prima di cominciare a progettare un 
nuovo percorso; meglio di tutto è uti¬ 
lizzare un dischetto appena inizializza- 
to. Potete creare un massimo di dieci 
buche per ogni percorso, che corri¬ 
sponde al quantitativo massimo di in¬ 
formazioni memorizzabili su un di¬ 
schetto che contenga solo i programmi 
GOLF. 

Per ogni buca viene chiesta la posi¬ 
zione del tee, la sua collocazione ri¬ 
spetto al green (il che determina la 
direzione in cui si manderà la pallina), 
la posizione del green e l’eventuale 
presenza di alberi, rough, bunker od 
ostacoli d’acqua. Poi si determina il 


SCEGLI 1.: 2.. ì, 0 4 | 

(1) GIOCARE SU UH NUOVO PERCORSO. 

(2) GIOCARE UN ALTRO GIRO SULLO 
STESSO PERCORSO. 

(3) CREARE UN NUOVO PERCORSO. 

(45 FINIRE IL PROGRAM». 


Figura 1 . Menù principale. 
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10 REM *«««*****«**«****« 

20 REM * * 

30 REM * GOLF * 

40 REM * DI BARY KNOX * 

50 REM * COPYRIGHT CO 1985 * 

40 REM * BY APPLICANDO 4 * 

70 REM * HICRB-SPARC, INC * 

80 REM * * 

90 REM ************************ 

100 IF PEEK (104) = 44 THEN 210 

110 TEXT ; HOME : ‘/TAB 8: HTAB 14; PRINT ■GOLF': PRINT 
; HTAB 14: PRINT "DI GARY KNOX" 

120 VFAB 20: PRINT 6 CO 1985 BY APPLICANDO 4 MICROSPARC*: 

PRINT “PREMI UN TASTO QUALUNQUE PER COMINCIARE’: HTAB 
19: SET K^: PRINT 

130 ; 

140 REM **»*RBUTINE CARI ORIENTO**** 

150 : 

140 TEXT : HOME 
170 VTAB 10 

180 PRINT "UN MOMENTO.“ 

190 P0KE 103,1: P0KE 104,44: POPE 14334,0 
200 PRINT CHR$ (4):"RUN GOLF’ 

210 IF PEEK (2791) = 15 AND PEEK (2793) = 32 THEN 250 
220 REM CARICA FIGURE E ROUTINE SCRN 
230 PRINT CHRi (4)j"BLOAD 3CRN" 

240 PRIMI CHRi (4):’BL0AD GOLF.SHAPES" 

253 0* = Cffl» (4)il» = CHI» (13): TEXT : HOME : POKE 232,2 
31: POKE 233,10:11$ = ”:TP = RND ( - 1) 

240 : 

270 REM **** MENU' **** 

280 : 

290 DIM CL$(2Q) .HTX<20) ,VX(5) ,UBCC5) ,IRX(5) ,7MiC5) 

300 DIM PHXC5) ,PTX<5) ,PX(5) ,PY(5) ,PX(5) ,P$(5) ,KfKC5),N1<5) 

310 HOME :TP = 0 : SESTORE 

320 VTAB 5: FRIN T "SCEGLI 1, 2, 3, Q 4 » 

230 VTAB IO: HTAB 3: PRINT °(1> GIOCARE SU UN NUOVO PERCORS 

0,'; PRINT : HTAB 3: PRINT »<2> GIOCARE UN ALTRO GIRO S 
ULLO': PRINT : HTAB 7: PRINT "STESSO PERCORSO," 

340 PRINT : HTAB 3: PRINT "(3) CREARE UN NUOVO PERCORSO.": PRINT 
: HTAB 3: PRINT *(4> FINIRE IL PROGRAMMA," 

350 VTAB 5: HTAB 23: GET A$: PRINT :A = VAL (Ai): IF A < 1 
OR A > 4 THEN 350 
340 ON A GOTO 420,710,370,380 
370 PRINT 0$:“Riti'CREARE’ 

380 T EC : HOME : END 
390 : 

400 REM ««SCEGLIE IL PERCORSO**** 

410 : 

423 ONERR GOTO 3540 

430 HOME : VTAB 10: PRINT "STO LEGGENDO LA USTA DEI PERCOR 
SI”:NS = ”“;LL$ = ’S" 

440 PRINT Dij’OPEN COURSE.LIST" 

450 PRINT Di: "READ COURSE.LIST" 


440 INPUT NUH: IF NUM < > 0 THEN 490 
470 PRINT D*:"CLQSE COURSE.LIST" 

480 HOME : VTAB 22: INVERSE : PRINT "NON CI SONO PERCORSI S 
U QUESTO DISCHETTO": NORMAL slLi = GOTO 320 
490 FOR K = 1 IO NUM: INPUT N$<K),K(£KK>: NEXT K 
500 PRIfTT Dij'CLOSE COURSE.LIST" 

510 HOME 

520 U = INT (NUM / 5):L = NLM - U * 5: INVERSE : HTAB IO: PRINT 
"LISTA DEI PERCORSI": NORMAL : PRINT : PRINT 
530 IF U = 0 THEN U = 1: GOTO 430 
540 FOR K = • TO U: FOR N = 1 TO 5 
550 HTAB 5: PRINT "CN“) * RIGHTi (N$(5 * U * N - 5), LEN 
(N$<5 * U + N - 5)) - 1): PRINT 
540 NEXT N 
570 SOSUB 3100 
580 IF A = 0 THEN 410 
590 IF A ) 0 AND A < é THEN 710 
400 PRINT : GOTO 570 
410 NEXT K 

420 IF ASC (Ai) = !3 AND L = 0 THEN VTAB 1: GOTO 520 
430 IF L = 0 THEN 710 

440 FOR K = 1 TO L: HTAB 5: PRINT "CK") " RIGHTi <N$<5 * 

U - K - 5), LEN (Ni(5 * U + K - 5)) - 1): PRINT 
450 NEXT K 
440 GOSUB 3100 

470 IF A < = 0 OR A > L THEN PRINT : GOTO 440 
480 : 

490 REM ««INTRODUCE NOMI GIOCATORI**** 

700 : 

710 FOR I = 1 TO 5:Pi(!) = ”: NEXT 1:PN = 1: IF LLi = *■ THEN 
310 

720 W.(PN) = PN 

7S0 HOME : 'VTAB 3: PRINT "INTRODUCI IL NOME DEL GIOCATORE N 
ELL'AP-POSITO SPAZIO." 

740 LLi = "S" 

750 'VTAB 5: BRINI "PREMI <-- (FRECCIA SINISTRA) PER FARE 
CORREZIONI 

740 VTAB 20: HTAB 10: PRINT ‘PREMI * ; : INVERSE : PRINT ’ RE 

TURN NORMAL : PRINT ’ QUANDO HA! FATTO." 

770 VTAB 7; HTAB 8: PRINT ’NCN PIU' DI 5 GIOCATORI." 

780 VTAB 12: HTAB 14: INVERSE : PRINT ■<•;: HTAB 25: PRINT 
V: NORMAL 

790 U2 = 14: VTAB 12: HTAB 15 
800 GET A4 

810 IF ASC (Ai) = 2! THEN Ai = * ": GOTO 870 

320 IF ASC (Ai) = 13 THEN 890 

830 IF ASC (Ai) < >8 THEN 870 
840 IF POS (0) = 14 T HEN 800 

850 IF U2 = 15 THEN P$(PN) = ": CALL - 1008: PRINT * " ; : CALL 
- 1008: GOTO 790 

840 P$(PN) = _E~$ '.p$<pN),U2 - 15): CALL - 100S: PRINT * 

• ::U2 = U2 - 1: CALL - 1008: GOTO 800 

370 Ir 02 < 24 T HEN U2 = U2 * l:Pi(PN) = P$(PN) * Ai: HTAB 

U2: ARIMI Ai:: GOTO 800 
880 GET Ai: GOTO 810 
393 IF PN = 5 THEN 920 

900 HOME : VTAB 10: PRINT "ALTRI GIOCATORI? SAI? GET Ai 
: IF Ai = "S" T HEN PN = PN + 1 : GOTO 720 
910 IF Ai < ) ’N" THEN 900 
920 FOR K = 1 TO PN:PT/.(K) = Gì NEXT K 

930 FOR K = ! TO 20: READ CLi'.K.) ,HTX(K) : NEXT K 

940 IF Ni < > " THEN 1000 
950 Ni = Mi<5 * U - 5 * A) 

940 KS = KQX(5 * u - 5 t A) 

970 : 

980 REM ««COMINCIA IL GIOCO**** 

990 : 

Continua 


par per ciascuna buca indirizzando la 
palla dal tee all’asta della bandiera. 

Creato il percorso, si torna al menù 
principale dove si può scegliere l’op¬ 
zione 1 per giocare sul percorso appe¬ 
na creato. Dopo che il programma ha 
chiesto i nomi dei giocatori, viene vi¬ 
sualizzata l’immagine in alta risoluzio¬ 
ne della prima buca, e ha inizio il gio¬ 
co. 

È disponibile un'ampia scelta di ba¬ 


stoni ogni volta che si colpisce la palli¬ 
na. Dopo aver scelto il bastone si può 
far ruotare una freccia nella direzione 
in cui si vuol mandare la palla. Atten¬ 
zione al vento! Può rovinare un colpo 
ben piazzato. Sono perfino possibili 1’ 
hook e lo slice della palla. 

Il computer non permetterà di man¬ 
dare la pallina al disopra di un albero 
se si è troppo vicini. Quando la palla 
viene spedita fuori limite o nell’acqua 


si riceve un colpo di penalità. Poi il 
computer ricolloca la pallina in posi¬ 
zione giusta per il prossimo colpo. 
Quando la palla finisce nel rough o in 
un bunker si deve scegliere il bastone 
giusto per avere i migliori risultati. 
Quando si fa il putt o si usa qualche 
altro bastone si può decidere con qua¬ 
le forza colpire la palla. 

Il programma è composto da quat¬ 
tro sottoprogrammi: due in BASIC, 
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Applicando 

ha on fw* uro :*: 

tessisi:: - 

l^s*sas«w 

per non perderlo, 

abbonati sobito! 

__iniera di idee, d'programmi, 


• • di iciee, dii programma 

BBSsyes-u^»— 

Affrettati a spedire ut y 



. lcr . a Editronica srl, 


Gratis, - 
se ti abboni 
sobitol 


ì 

► 


cf mi abbono! ,,» — ***** » 50000 

** 1 ■ Applicando, Le; P Q 9 ine , a 40.000 lire. . 

□ Inviatemi dieci numei i pp \\ ca ndio e la cada PP .• j-” oonìbili vedi alla 

D inviatemi ^J^ Q abbia inizio dal numer ^ arre trat. d*P°. 

• j ^ rhp il mio abbonam cadauno lP e . 

> AUeg ° aSSe9n _ u. versamento di L... „ , mDrica rd N.mi. 


-i AUeoo assegn . . 

□ Pago fm d ora L.•• autor | zz ando la Ba . 

scadenza ; rnr d. . . _ . 


i ruy'-'. .. autorizzar 

Cognome 

Via . 

CAP. 


..Città 


• r^rl Fise /Part.lVAè 
□ Desidero fattura. U mio 

u Data 


.Nome. 


.N. 


Provincia. 
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s'tssss" 

sonattzzato sceg licpmente con un uso 
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un’intera (i ' at ™S 0 m Pascal • P® 
torte, °'9 an ?® nP re ntù velocemente le 
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del VisiDex • , G 'X'tonario personal 
p uò se t p' T t f e nàApple• RompiQUind'eu 
computer della PP mettete pel 
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giusto ordine p « rassegna dei- 
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Guida ragtooateje doml njale • 

SSSCi®** 1 * 

ware. 


5 . Gennaio-Febbraio 198^ ^ 

7.000 - ta tecnologia “« # Mclntosh, 
rata ad App'e/7 ijW" portatile • 'n 

piccolo, maneggevole. Pf> ^ pp ann0 
memoria i vosti^Lmnaoer la contabili- 
intero • ^ P™ 9 i a u n d ,mo per due, nel 

ta' semp rticato * un o J nl dl 

rr— 

rtP .l mlQliori programmi 


alibro • tnvestor in porramu^ 

uno dei^hetto^soìe settantami ta 
(oppure su dischetto a soie ^ quad , 0 

lite) tornisce in temp . inves ti- 

esatto di come vanm i P™^ come 

menti fmanz^art- o ^ er \ a ge - 

sWuttu,a Jtl 
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tré per ter un unico ^ d sheet • 
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grammi piu T: t d eii'Applesoft 
mazione: sesta puma ^ gratica • 
per svelarvi tutti > segreti ^ pasca i 
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gliori segretarie e corne e Apple 
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carattèrrche scorrono e altri ette'" con 
V Applesoft. 
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LEZIONE DI GOLF 

Il gioco del golf consiste nel tirare una apposita pallina da un punto di partenza, detto tee, a un punto d’arrivo, un 
buco del diametro di circa 10 centimetri, situato nel green , servendosi di appositi bastoni e con il minor numero di tiri 
possibile. Questo singolo percorso è detto buca, e un circuito regolamentare è formato da 18 buche. Una partita 
amichevole a golf può essere disputata sul numero di buche che si vuole, 36 o una sola non fa differenza. 

I bastoni si dividono in due tipi: legni e ferri. / legni servono per compiere maggiore distanza, in genere per 
effettuare il primo tiro di partenza dal tee di ogni buca; i ferri compiono una minore distanza, ma permettono tiri più 
precisi. Ferri e legni sono contraddistinti da un numero: più basso è il numero, e più distanza si riesce a far percorrere 
alla pallina. Esistono inoltre il putt, che è un particolare tipo di ferro che si usa nel green per tirare la pallina in buca, 
il santi , che serve a far uscire la pallina dal bunker, un particolare ostacolo rappresentato da una buca di dimensioni 
diverse, piena di sabbia, che in genere difende il green, e il pitch, un ferro particolarmente adatto a tiri molto corti. 

Ogni buca ha un suo par, che è il numero regolamentare di colpi che servono a tirare la pallina dal tee di partenza 
alla buca di arrivo, e può essere solo 3, 4 o 5. Se un giocatore compie il percorso di una buca un colpo sotto il par si 
dice che ha fatto birdie, due colpi sotto, eagle, un colpo sopra, bogey. 

Ogni buca è costituita, come abbiamo visto, dal tee di partenza e dal green, la parte finale dove è situato il buco nel 
quale infilare la pallina. Poiché una buca può essere lunga più di 500 metri, fra tee e green esistono anche il rough, 
che è terreno incolto, contraddistinto da erba alta, situato in genere subito dopo il tee, e il fairway, terreno curato, 
contraddistinto da erba bassa. Per rendere più interessante il gioco (e, ovviamente, più difficoltoso), lungo il 
percorso si trovano diversi ostacoli: alberi, laghetti e stretti corsi d’acqua (ostacoli d’acqua), bunker (ostacoli di 
sabbia). 



una routine in linguaggio macchina e 
una tavola delle figure. Prima di poter 
giocare dovete introdurre le quattro 
parti come descriveremo qui di segui¬ 
to. Per prima cosa digitate il program¬ 
ma in Applesoft visibile nel listato 1 e 
salvatelo su dischetto battendo SAVE 
GOLF. Secondo, digitate il program¬ 
ma che crea un percorso, visibile nel 
listato 2, e salvatelo con il comando 
SAVE CREARE. 

Fate particolare attenzione quando 
digitate le linee dei dati di questi due 
programmi; questi dati infatti control¬ 


lano come viene colpita la palla. Ter¬ 
zo, introducete la routine in linguag¬ 
gio macchina del listato 3 e salvatela su 
dischetto con il comando: 


BSAVE SCRN, AS90C, LS1DB 


Introducete infine la tavola delle fi¬ 
gure visibile nel listato 4 e salvatela sul 
dischetto con il comando: 


BSAVE GOLF. SHAPES, ASAE7, 
LS1E3 


Se non siete troppo esperti nel rico¬ 
piare programmi, date un’occhiata al¬ 
le pagine Per chi comincia : troverete 
risolti e spiegati molti dubbi che abi¬ 
tualmente assillano i neofiti. 

Una volta digitati i quattro pro¬ 
grammi, non vi resta che battere RUN 
GOLF, e divertirvi. 

Spiegazione 
del programma 

Date le dimensioni del programma, 
il suo impiego della grafica e il numero 
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1570 IF FI 5 0 THEN ROT= 0: FOR KK = I TO 8: HCOLOR= 0: SCALE= 

/J, r ** ** 

KK: DRAU 1 AT XT.YT: NEXT KK 

/ ^ \ 

1580 IF FI = 0 THEN SCALE= 2: R0T= 0: HCGLOR= 3: XDRAU 2 AT 

( * ^ X 

PX<V!4(PL)) ,PY(VX(PL» :R 5 0 

1 ^ /; "y 

1590 VTAB 22: HTAB 11: CALI - 848: PRINT 'SCEGLI LA 0IRE2I 

\ r I 

ONE DEL COLPO' 

^\msàpsdBW 

1400 FI 5 i 

1410 VTAB 24: CALL - 84B: PRINT s R=ORARIO E=ANT1ORARIO F=F 

fi ex 

INITQ"; : VTAB ! 

4ì 

1420 SET Ai: IF AT = *F' THEN 1720 

1430 IF Ai = 'R' THEN R = R + 4: GOTO 1440 

1440 IF Al = 'E' THEN R = R - 4: GOTO 1440 


1450 GOTO 1420 

1440 IF R < 0 THEN R = 40 

Ì470 IF R > 44 THEN R = 4 

1480 XDRAU 2 AT PX<y/(PL)3.PY<VX(PL)>: HCOLOR= 3: ROT= R: XDRAU 


2 AT PX(VZ(PL»,PY(VX(PL))i GOTO 1420 

1000 GP = 0: FOR H = 1 T0 KQ 

1490 : 

1010 PD = 0:UD = 1NT (4 * IfrlD (l));tW = INI (15 * (9(0 (1 

1700 REM ««COLPISCE LA PALLA**** 

))*1:UV = INT (.13 * W * W - .44 * W * 1.2) 

1710 : 

1020 FOR K = 1 T0 PN:PHZ(K) = 0: NEXT K 

1720 'VTAB 22: HTAB 11: CALL - 958: PRINT "PREMI H PER COLF 

1030 IF UD = 0 THEN UY = - IW:UX = 0 

IRE LA PALLA*; 

1040 IF UD = 1 THEN UY = 0:UX = (W 

1730 SOUND = PEEK < - 14334): IF PEEK i - 14384) < > 200 THEN 

1050 IF UD = 2 THEN UT = UV:UX = 0 

1730 

1060 IF UD = 3 THEN UY = 0:UX = -W 

1740 FOR 2Z = 1 TO lOiSOUND = PEEK ( - 16334): NEXT 22 

1070 : 

1750 GET Ai: PRINT 

1080 REM ««DAT! BUCA**** 

1740 ROT= R: SCALE 5 2: XDRAU 2 AT PX(VX(PL)>,PY(VX(PL)): HCOLOR= 

1090 : 

3 

1100 HOME ; VTAB 10; FRINÌ ‘UN MOMENTO PREGO..,' 

1770 i = INT (R ./ 14) :R = R - I * 14 

1118 PRINT Wj'OPEN'NiVH 

1730 ZZ 5 FRE (0) 

1120 FRINÌ Dij'READ'NiVH 

1790 RESTOSE : FOR KK = ! TO 20: READ AA1.AA: NEXT KK:DI = 

1130 INPUT C.PARiTP = TP + C 

Q 

1140 INPUT XT,YT,XG,Y6 

1800 : 

1150 FRINÌ D$i s CLOSÉ”N»*.'H 

1310 REM ««CALCOLA DISTANZA DEL COLPO**** 

1140 HGR :GP = GP + PARiXG = XG - 12:YG = YG + 2 

1820 : 

1170 HOME i VTAB 21; HTAB 5; INVERSE ; FRINÌ 'BUCA "H:: HTAB 

1830 19* 5 Uff (lì * RND <1» + 2:NQ = INT (Il * RND (D) 

15; FRINÌ 'PAR “PAR;: HTAB 25: PRIMI 'DISTANZA 5 ^: NORMAL 

♦ 2 

: VTAB 1 

1840 POR KK = ! TB CN: READ Al: NEXT KK 

1180 PRINT Di:'BLQAD'Ni'.HOLE'H 

1350 IF CN = 21 THEN 1370 

1190 IF W = fi THEN 1230 

1840 FOR KK = CN * ! TO 21: READ AA: NEXT KK 

1200 RQÌ= 14 * UD: HCOLOR= 3: SCALE 5 1: ORAU 2 Ai 270,90 

1870 !F EF = 0 THEN 1900 

1210 VTAB 22: FLASH : HTAB 5: FRINÌ 'VELOCITA' DEL VENTO =* 

1880 FOR KK 5 ! TO CN - 12: READ 81,B2: NEXT KK 

; : NORMAL : FRINÌ * "UV* K/H" 

1890 D = B! * m * 191 * B2 * 191 + Al :DX = 0: GOTO 1970 

1220 FRINÌ 'DIREZIONE DEL VENTO INDICATA A DESTRA DEL PER 
CORSO': GOSUB 3040: VTAB 22: HTAB I: CALL - 958 

1900 D = - .5 * fi* * 191 * 14.4 * 111 * A! 

1910 POR KK = 1 TO 9: READ AA.AA: NEXT KK 

1920 IF CN < 5 THEN ZZ = CN: GOTO 1950 

1230 FOR KK = I TO PN:PX(KK) = XT:PY(KK) = YTiUBKKK) = 0:1 

RZ(KK) 5 9; NEXT KK 

1930 IF DI < 9 THEN ZZ 5 4: GOTO 1950 

1240 HCOLOR= 3 

1940 ZZ = 5 

1250 FI 5 0 

1950 FOR KK = ! TO ZZ: READ 81,82: NEXT KK 

1240 : 

I960 DX = B1 * NG + B2 

1270 REM ««TURNI DEL GIOCATORE**** 

1970 YC = D * COS <R * 3.14159 / 32):XC = S * SIN (R * 3.1 

1280 : 

4159 / 32) 

1290 FOR PL = ! TO PN 

1980 IF IRXCV/.CPL» 5 ! THEN D 5 D - D / (2 * TC3 :IRX(7/(PL 

1300 XP = FX(VX(PD) :YP = PY(V/!PD) 

3) 5 0 

1310 IF PD = 0 THEN 1340 

1990 IF UEX(V/.(PL» 5 1 AND TC$ < > ’UEDGE' THEN D = 5:UEX 

1320 FOR KK = 1 TO PD: IF VX(PL) = TDX(KK) THEN 2810 

flBKPD) = 0 

1330 NEXT KK 

2000 IF UEX(VX(PL)) = ! THEN UEX(VX(PL)) = 0 

1340 IF FI = 1 THEN ROT= 0: FOR KK = 1 TO 8: HCOLOR= 0: SCALE 5 

2010 IF TCi = 'PUTT" OR TCi 5 'SANO' OR TC$ = "PITCH" THEN 

KK: DRAM 1 AT XT.YT: NEXT KK 

2040 

1350 IF FI = 1 THFN SCALE= 2; ROT= 0: HCOLOR= 3: XDRAU 2 AT 

2020 IF I = 0 OR I = 2 THEN XC = XC t UX:YC = YC + UY 

PX<V7.(PL)) ,PY(VK(PL)) :R = 0 

2030 IF ! = i OR I = 3 THEN XC 5 XC + UY:YC = YC * WX 

1340 : 

2040 D = 3QR (XC * XC * YC * YC) 

1370 REM ****SCEGLIE ! BASTONI**** 

2050 A 5 ATN (DX / D) 

1380 : 

2040 IF YC = fi THEN AN 5 0: GOTO 2080 

1390 PHWVX(PL)) = PHX(VX(PL)> + liPT/KVXfPL)) = PTXtVX(PL)) 

2070 AN = ATN (XC / YC) 

* 1 

2080 AN = AN t A:XC = SIN (AN):YC 5 COS (AN) 

1400 VTAB 22: FRINÌ PÌ(VX(PL));: HTAB II: FRINÌ 'QUESTO BAS 

2090 IP ! = 0 THEN YC = - YC:XC 5 XC 

"ONE...S 0 N?” 

2100 IF ! = ! THEN T = XC:XC = YC:YC = T 

1410 91 = 1:RN = 5: GOSUB 3110:TC 5 CC 

2110 IF I 5 2 THEN XC 5 - XC:YC = YC 

m 

2120 IF ! = 3 THEN T 5 XC:XC = - YC:YC = - T 

2138 D2 5 D 

1440 IF TC = 2 THEN BN = 10:RN = 17 

2140 VTAB 23: CALL - 958: PRINT 'DISTANZA COLPO = 0*: HTAB 

1450 IF TC > = 3 THEN BN = 18:RN = 20 

11: VTAB 22: CALL - 368: HTAB 25: PRINT 'COLPI 5 *PHX( 

1440 'VTAB 22: HTAB 11: CALL - 848: FRINÌ 'QUESTO 'CLÌ(TC)' 

VX(PD) 

? S 0 N?' 

2150 ROT= 0: HCOLOR= 3: SCALE 5 1: XDRAU ! AT PXCVX(PL)),PY( 

1470 TC$ = CL$<TC) 

V/.(PL)3:DI 5 SQR ((PX(VK(PD) - XP) ‘ 2 + (PY(VX(PLÌ) - 

1430 GOSUB 3110 

YP3 * 2) * 2.2 

1490 IF TC = 1 THEN CN = CC - 5:EF 5 0 

2160 VTAB 23: HTAB 18: CALL - 86B: PRINT INT (DI) 

1500 IF TC = 2 THEN CN = CC - 3:EF = 0 

2170 : 

1510 IF TC = 3 THEN CN 5 CC - 5:EF = 1 

2180 REM ««FATTO IL TIRO? «** 

1520 IFTC = 4 THEN CN = CC + 1:EF = 1 

2190 : 

1530 IF TC = 5 THEN CN = CC - 2;EF = 1 

1540 : 

2200 XDRAU ! AT PX(VX(PL)).PY(W£<PD) 

2210 IF DI > = D2 THEN 2580 

1550 REM ««RUOTA IL TEE**** 

?22Q PX(VX(PL3) ='FX(VX(PL» * 2 * XC:PY(VX(PL)3 = PY(VX(PL) 

1540 : 

) + 2 * YC 
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2230 IF ABS <PX<MJ£(PD) - XG) > 3 THEN 2310 

2750 XC = - XCi v C = - YC 

3240 IF ABS (PY(v'KPL)) - YG' } 4 THEN 2310 

2760 GOSUB 3310 

2350 !F DI < .9 * D2 AND 7C4 < > “PUTT" THEN 2310 

2770 IF HB = 0 THEN 2790 

22ó0 FOR K = 1 TQ 2DU:S0UND = PEEK < - 16336): NEXT K 

2780 GOTO 2760 

2270 VTAB 23: HTAB 1: CALI - 958: VTAB 22: HTAB 25: PRINT 

2790 HTAB I: VTAB 22: CALL -958 

■punti = ’rmmru) 

2800 IF PD = PN THEN 2860 

2280 HTAB 10: PRINT “HAI IMBUCATO 11 * 

2910 NEXT PL 

2290 PD = PO + 1:TDX(PD> = Fi > 

2820 GOTO 1290 

2300 60SUB 3060: GOTO 2790 

2830 : 

2310 PX = PXtVWPD); GflSUB 3230 

2340 REM ««STAMPA LO SC0RE«« 

2320 : 

2850 : 

2330 REM ««FUORI UNITE? *«* 

2860 HOME : TEXT : INVERSE 

2350 IF PXfWKPL» < = 2 THEN PXWXtPL» = 10: GOTO 2400 

” Min wMimtam ■•■mn 

2360 IF PX(VA'PL)) > = 253 THEN PXWAPL» = 249: GOTO 240 

K 

0 

2880 FOR KK = 1 TO 23: HTAB 1: VTAB KK: PRINT ’ *: HTAB 39: 

2370 IF PY(VAPL)) < = 2 THEN PYtVAPL)) = 10: GOTO 2400 

VTAB KK: PRINT “ “: NEXT KK 

2380 IF PYtVAPL» ) = 148 THEN PYWAPD) = 139: GOTO 240 

2890 VTAB 3: HTAB 5: PRINT “LO SCORE PER LA BUCA ’H: N0RMAL 

0 

: PRINT : PRINT 

2390 GOTO 24SB 

2900 HTAB 12: PRINT C" METRI PAR= "PAR 

2400 D2 = DI iPHXCVA'PL)) = PHWVAPL» + 1 :PTJ£(«JK<PL) > = m 

2910 VTAB 9: HTAB 4: PRINT "NOME";: HTAB 17; PRINT "BUCA";: 

iVAPL)) + 1 

HTAB 27: PRINT “PERCORSO" 

2410 G0SUB 3310 

2920 VTAE il 

242? G0SUB 3300 

2930 C 0R PL = ! TO PN 

2430 VTAB 23: CALI - 958: PRINT "FUORI UNITE...UN COLPO 0 

2940 HTAB 4: PRINT PitTDXtPL»;: HTAB 18: PRINT PHATDX(PL) 

: PENALITÀ'!": VTAB 22: HTAB 25: PRINT “COLPI = «PHJKVK 

>:; HTAB 29: PRINT PTX(TDXtPL)) 

(PL)) 

2950 VX(PL) = TDV.(PL) 

2440 POR 22 = 1 T0 2000: NEXT 22: GOTO 2790 

2960 NEXT PL 

2450 * 

2970 HTAB 6: VTAB 21: INVERSE : PRINT “PAR DEL PERCORSO FIN 

2460 REM ««CONTROLLA COLORI SCHEfflO**** 

ORA = PRINT GP: N0RMAL 

'470 : 

2980 GOSUB 3060 

2430 IF HB < ) 1 THEN 2150 

2990 NEXT H 

2490 IF Di < 30 OR D2 - DI < 40 THEN 2510 

3000 GOTO 310 

2500 GOTO 2150 

3010 END 

2510 D2 = DI 

3020 : 

2520 G0SUB 3300 

3030 : 

2530 VTAB 23: CALL - 958: PRINT “Itti COLPITO UN ALBERO 1 ! 1 

3040 REM ««ROUTINE BATTUTA TASTO**** 

2540 FOR 22 = 1 T0 1000: NEXT 22 

3050 : 

2550 XC = - XCiYC = - YC 

3060 'VTAB 24: HTAB 1: PRINT “PREMI IL “:: INVERSE : PRINT ‘ 

2560 GOSUB 3310 

TASTO";: NORMAL ; PRINT ■ RETURN PER CONTINUARE...";: GET 

2570 IF HB < >0 THEN 2560 

Ai: CALL - 958: RETURN 

2580 VTAB 23: HTAB 1: CALL - 958: PRINT "HAI MANDATO LA PA 

3070 : 

LLA A ■ INI (D2)“ METRI 1 “: FOR QP = 1 Tu 1000: NEXT 0P 

3080 REM ««SCELTA DELLE ROUTINE**** 

2590 PX = INT (PX(VAPL))) : GOSUB 3230 

3090 ; 

2600 IF HB ( >7 THEN 2650 

3100 V T AB 21: PRINT “INTRODUCI IL NUMERO DELLA TUA SCELTA., 

2610 GOSUB 3300 

.“: PRINT : HTAB 5: PRINT “0 PREMI ";: INVERSE : PRINT 

2620 VTAB 23: CALI - 958: PRINT "IN BUNKER! !.. .USA IL SPND 

“RETURN';: NORMAL : PRINT ■ PER CONTINUARE.*ss GET Ai:A 

."iWEAVAPL)) = ! 

= VAL (A*): RETURN 

2630 FOR 22 = 1 TQ 1000: NEXT 22 

3110 VTAB 24: FOR RK = BN T0 RN: HTAB HTX(RK): PRINT CLiiRK 

2640 GOTO 2790 

) ; : NEXT RK 

2650 IF HB < >5 THEN 2700 

3120 CÈ = BN 

2660 GOSUB 3300 

3130 VTAB 24: HTAB HTX(CC): FLASH : PRINT CLftCC);: NORMAL 

2670 VTAB 23: CALL - 958: PRINT "NEL R0UGH! ! ...NON USARE U 


N LEGNO."sIRWVAPL» = 1 

3140 GET Ai: IF Ai = "S" THEN 3190 

2680 FOR 22 = 1 TO 1000: NEXT 22 

3150 IF Ai < > “N“ THEN 3140 

2690 GOTO 2790 

3160 VTAB 24: HTAB HT5KCC): PRINT CLÌ(CC);:CC = CC + 1 

2700 IF HB < > 2 THEN 2790 

3170 IF CC > RN THEN 3120 

2710 PHX(VX(PL» = PHAVAPL)) ♦ i:PT*/.(VAPL)> = PTX(VXCPD) 

3180 GOTO 3130 

+ \ 

3190 RETURN 

2720 GOSUB 3300 

3200 : 

2730 VTAB 23: CALL - 953: PRINT "NELL'ACQUA! !... .PENALITÀ' 

3210 REM ««ROUTINE COLORE SCHERMO**** 

DI 1 COLPO." 

3220 : 

2740 VTAB 22: HTAB 25: PRINT “COLPI = “PHAVXtPL)) 

Continua 


delle variabili, le linee 190—200 cari¬ 
cano il programma sopra lo schermo 1 
della Hi—Res. 

Le linee 230—240 caricano la routi¬ 
ne SCRN in Hi-Res (listato 3) e le 
tavole delle figure nella memoria nor¬ 
malmente usata per i programmi in 
Applesoft. 

Le linee 100 e 210 permettono di 
caricare il programma e i file binari 
soltanto una volta, anche se si può ese¬ 
guire il programma diverse volte in 
una stessa seduta. 

Il programma GOLF (listato 1) con¬ 
trolla tutte le altre routine compreso il 


programma CREARE (listato 2). Per¬ 
tanto, quando si vuole creare un per¬ 
corso, si può ancora fare RUN GOLF. 
Sarà visualizzato in tal caso un menù 
che comprende l’opzione di creare un 
nuovo percorso. Quando si è finito di 
creare il percorso, il computer ricarica 
automaticamente il programma 
GOLF. 

Il programma GOLF fa un uso mol¬ 
to efficace della porzione di testo dello 
schermo Hi —Res. I dati relativi alla 
buca, al nome del giocatore, alle scelte 
del bastone e ai risultati di gioco sono 
tutti visualizzati con cura per una rapi¬ 


da consultazione. Una freccia sulla de¬ 
stra dello schermo Hi—Res indica la 
direzione nella quale soffia il vento a 
quella buca. 

Le linee 520—670 visualizzano una 
lista dei percorsi che sono stati salvati 
su dischetto. 

Le linee 690—910 permettono di in¬ 
trodurre il nome di ciascun giocatore. 
Sono previste sicurezze d’errore perla 
lunghezza del nome e gli errori di bat¬ 
tuta. 

Le linee 1000—1250 predispongono 
il percorso e i punteggi dei giocatori e 
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3230 POKE 2308, IMT (<PX * 1) / 256): POKE 2309,PX + 1 - INT 
<(PX + li / 253) * 253 

3240 POKE 2310, INT <PY(YX(PL))) : DALL 2313 
3250 HB = PEEK (2314) 

3230 RETURN 
3270 : 

3280 REM ****SUONO**** 

3290 : 

3300 POR 2Z = 1 TO 10:30UND = PEEK < - 13333): NEXT 22: RETURN 


3310 

3320 

3330 

3340 

3350 

3330 

3370 

3380 

3390 

3400 

3410 

3420 

3430 

3440 

3450 

3430 

3470 

3480 

3490 

3500 

3510 

3520 

3530 

3540 


REM ««SPOSTAMENTO INDIETRO**** 

PX(W.<PL)> = PXW/CPL)) * XC:RY<MX(PL)) = PYWX(PL)) * 
YC 

PX = PXOrZ(PL)): GOSUB 3230 
RETURN 

'rem ****DATI BASTIONI**** 

'DATA 'LEGNO',1,'FERRO',7,‘SAND*,13,'PUH',20,'PITCH", 
2S 

DATA 1,10.2.13,3.13,4,19 

DATA 2,5,3,8,4,11,5,14,3,17,7,20,8.23,9,23 

DATA 'PlBl0",5,'ìlE220',li,"LEGGERO 1 ,25 

REM ****DATÌ D1STAN2A**** 

'DATA 133,142.122.112,102,92,82,72,32,52,42,32 
DATA 22,1.4,23,70,50,15,-7.7,-3.3,-3 
DATA -.5,14.3,'-.5,14.3,-.2,4.8,.8,-10.8,.8,-10.8,.2,- 
2.4,-.9,12.2,-.3.4,8.-.L2 
DA + A 10,-70,7.4.-51.5,7.4,-51,5,3.4,-44.5 
DATA 3,-42,4,-28 

'REM ****ROUTINE ERRORI**** 

IF PEEK (222) < > 5 THEN PRlffT "ERRORE N." PEEK (22 



2)' A LINEA:'j PEEK (218) * PEEK (219) 
"PREMI UN TASTO PER RICOMINCIARE.“: 

3550 PRINT fr$;"CLDSE": PRINT Wj'DELETÉ 
3530 PRINT D$;"0PEN COURSE.LIST* 

3570 PRINT Dli'URITE COURSE.LIST": PRINT 0 
2580 PRINT D$:“CL03E" 

3590 LL$ = ’ * : GOTO 480 


* 253: HTAB 4: PRINT 
. Ki: RUN 
iURSE.LSST" 


visualizzano sul monitor l’immagine 
della buca. 

Le linee 1270—2820 sono utilizzate 
per lo svolgimento vero e proprio del 
gioco. 

La linea 1320 controlla quali gioca¬ 
tori non abbiano ancora completato la 
buca. 

Le linee 1390—1530 determinano il 
numero del bastone scelto, in modo 
che siano letti i dati esatti della distan¬ 
za e della direzione. 



Le linee 1570-1680 permettono di 
scegliere la direzione in cui sarà colpi¬ 
ta la pallina. 

Le linee 1720—2160 sono usate per 
colpire la pallina. La freccia e la palli¬ 
na sono cancellate usando il comando 
XDRAW di modo che il display del 
percorso rimanga intatto. 

La linea 1830 sceglie due numeri ca¬ 
suali i quali sono usati nelle formule 
che si trovano nelle linee 1890,1900 e 
1960. Queste formule sono utilizzate 



per calcolare la distanza e 1’ hook o lo 
slice del colpo. Nella figura 2, la varia¬ 
bile R rappresenta l’entità della rota¬ 
zione. I numeri 0, 1, 2 e 3 sono usati 
dal programma come punti di riferi¬ 
mento sullo schermo. 

La linea 1970 calcola XC e YC (figu¬ 
ra 3). Il vento viene aggiunto nelle 
linee 2020 e 2030. 

Gli angoli AN e A sono calcolati 
nelle linee 2050 e 2070. L’angolo A è 
positivo o negativo a seconda che sia 
un hook o uno slice (+DX o —DX). Il 
nuovo valore dell'angolo AN è calco¬ 
lato come si vede nella figura 3. XC e 
YC vengono poi ridotti proporzional¬ 
mente ai valori inferiori a uno. Questi 
valori vengono usati come spostamen¬ 
ti passo per passo della pallina da golf 
(figura 4). 

La routine SCRN, che funziona 
esattamente come l’istruzione SCRN 
della grafica in bassa risoluzione, ren¬ 
de facile l’individuazione dei rough, 
dei bunker, degli ostacoli d’acqua e 
degli alberi con il loro colore anziché 
con le coordinate X, Y. Tutto il con¬ 
trollo del colore sullo schermo si trova 
nelle linee 3230—3260. 

La routine SCRN viene usata per 
individuare il colore di un punto trac¬ 
ciato sullo schermo Hi—Res. Viene 
usata la sequenza di comandi riportata 
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TEST 


r FSTÌ 

— 1 Sei proprio sicuro che il tuo computer 

sia sempre al sicuro? 

Siete certi di aver messo al riparo il vostro computer dai più comuni rischi 
e incidenti che possono capitargli? Rispondete sinceramente 
a queste 7 domande, sia che abbiate già sottoscritto una polizza assicurativa, 

sia che ancora non l’abbiate fatto. 






Andate al mare, in montagna, a casa di un 
amico e vi fermate lungo il tragitto per una 
commissione, un ladro vi ruba il computer dal 
portabagagli. Pagate voi? a si a No 



partite per una vacanza e decidete di portare 
con voi il vostro personal. Andate in 
albergo, in una casa in affitto o nella villa 
di vostro fratello, e succede qualcosa al vostro 
computer. Pagate voi?' sin No 




Siete nel bel mezzo di un applicazione 
complicata. Non volete interrompervi ma 
nemmeno rinunciare a un whisky on therocks 
o al caffè. Ahimè, il liquido finisce sulla 
tastiera mandando in cortocircuito il 
computer. Pagate voi? a sìa No 



Vostro figlio sì avvicina al computer senza 
essere visto e comincia a picchiarci sopra con 
un oggetto più duro del vostro computer. 
Pagate voi? a si a No 




Se qualche vostro amico o una vostra 
impiegata si fa male maneggiando il vostro 
personal, pagate voi? □ Si n No 


RISPOSTE 

7 No. Il vostro computer è davvero al sicu¬ 
ro. Bravi. 

6 No e 1 sì. valutate bene se II caso In cui 
avete risposto sì ha scarse possibilità di 
verificarsi. Potrebbe valere la pena di ri¬ 
schiare e di lasciare le cose come stanno. 
Da 2 a 7 sì. Affrettatevi a leggere il box qui 
sotto, perché il vostro computer non è 
affatto al sicuro, il che potrebbe causarvi 
un sacco di fastidi e farvi perdere un muc¬ 
chio di soldi. 


e applicando 

vi mettono al sicuro 

Sicuramente sarete convinti che esista già da tempo una 
polizza per assicurare II personal computer. Non è cosi. 
Finora tutte le compagnie di assicurazione hanno creato 
polizze nate per garantire I grossi centri di elaborazione 
dati, e solo in seguito hanno adattato queste polizze alle 
esigenze di coloro che vogliono assicurare II proprio perso¬ 
nal. Ma una polizza adattata non può certo paragonarsi a 
una polizza nata apposta per soddisfare le esigenze del 
possessore di un personal computer. Applicando. In colla¬ 
borazione con la Ras, una delle più importanti compagnie di 
assicurazioni Italiane, ha studiato a fondo II problema. E 
nata così là Polizza Applicando, la prima e. per II momento, 
unica assicurazione che copra tutti l rischi relativi al posses¬ 
so e all'uso di un personal e delle sue periferiche (stampan¬ 
ti. drive, video.ecc). Applicando è orgogliosa di presentarla 
In anteprima al suol lettori e di offrire loro la possibilità di 
sottoscriverla nella maniera più semplice. Basta leggere 
attentamente le condizioni pubblicate alla pagina seguen¬ 
te. compilare il tagliando e spedirlo a Edltronica srl. Polizza 
Applicando. Corso Monforte 39. 20122 Milano. Avrete cosi 
risolto, per sempre, tutti I vostri problemi. 

















































Condizioni generali di assicurazione. 


1) Premessa 

a) l’adesione alla presente polizza è riservata ai proprie¬ 
tari di un Personal Computer il cui valore stabilito 
come alla Condizione 6) sia superiore a L. 2.500.000 
IVA compresa; 

b) l’adesione alla presente polizza da parte dei proprie¬ 
tari di personal Computer avverrà a mezzo invio di 
apposita cartolina con il relativo importo di premio; 

c) l'intestatario della cartolina sarà considerato a tutti gli 
effetti come l’Assicurato; 

d) la garanzia sarà operante dalle ore 24 del giorno di 
spedizione della cartolina, risultante dal timbro posta¬ 
le. La copertura avrà durata un anno, sempreché la 
data di inizio della garanzia sia compresa nel periodo 
di validità della convenzione; 

GARANZIE PRESTATE E CONDIZIONI DI 
ASSICURAZIONE 

2) Sez. I - Danni materiali 

Derivanti da: 

a) incendio, opera di spegnimento e salvataggio, fulmi¬ 
ne. esplosione, scoppio, implosione; 

b) acqua e liquidi in genere, inondazione, alluvione, 
trombe, uragani, gelo, ghiaccio, neve, grandine, va¬ 
langa. caduta di massi e altri simili eventi; 

c) superamento del muro del suono, caduta di aeromo¬ 
bili o cose da essi trasportate; 

d) corto circuito, variazione di corrente, sovratensione 
arco voltaico, deficienze di isolamento, effetti di elet¬ 
tricità statica, induzione; 

e) imperizia, negligenza, errata manovra, nonché azioni 
dolose e colpose in genere; 

f) trasporti e smontaggi connessi con lavori di pulizia o 
di manutenzione; 

g) furto e rapina; 

h) terremoto, maremoto od eruzioni vulcaniche; 

i) persone che prendono parte a tumulti popolari, scio¬ 
peri, sommosse e che perpetrino indivudualmente od 
in associazione atti di terrorismo o sabotaggio verifi¬ 
catisi in occasioni di serrate. 

3) Sez. Il - Responsabilità Civile Terzi 

L'assiGurazione si intende inoltre prestata per la Respon¬ 
sabilità Civile derivante all’Assicurato dalla proprietà e 

dall’uso personale del Computer assicurato identificato 

nel certificato di assicurazione. 

I massimali di garanzia si intendono fissati in: 


L. 100.000.000 per sinistro con il limite di 

L. 100.000.000 per ciascuna persona deceduta o che 
abbia subito lesioni personali 

L. 100.000.000 per danni a cose e/o animali. 

4) Esclusioni 

La Società non è obbligata per i danni dovuti a: 

- dolo dell'Assicurato; 

- corrosione, deperimento, logoramento che siano con¬ 
seguenza del normale uso o funzionamento o causati 
dagli effetti graduali degli agenti atmosferici; 

- per i quali deve rispondere il fornitore, venditore o loca¬ 
tore degli enti assicurati per legge o per contratto, o per 
inadeguata manutenzione; 

- causati da difetti di materiale o di costruzione che esi¬ 
stevano già all'atto della stipulazione della polizza ed 
erano a conoscenza dell’Assicurato; 

- causati direttamente od indirettamente da avvenimenti 
bellici, sommosse militari, invasioni, adozione di misure 
da parte di potenze straniere, rivoluzione, ribellione, 
insurrezione, assunzione od usurpazione di potere di 
carattere militare, sequestri; 

- verificatisi in occasione di esplosione, radiazione nu¬ 
cleare o di contaminazione radioattiva; 

- uso improprio del bene (mancato rispetto delle norme 
di impiego dettate dal costruttore); 

- danni estetici (quelli interessanti l'involucro esterno che 
non sia conseguenza di un danno risarcibile a termine 
della presente polizza); 

- guasti casualmente riconducibili ad interventi, a ripara¬ 
zioni e/o modifiche effettuate da un centro non autoriz¬ 
zato dalla casa costruttrice della macchina; 

- danni indiretti in genere. 

5) Operatività della garanzia 

a) La garanzia è operante solamente se gli enti assicurati 
sono ubicati presso il domicilio dell’Assicurato od in 
luoghi diversi da questi se in possesso dell'Assi¬ 
curato. 

b) La garanzia è pure efficace se i beni si trovano sull’au¬ 
tovettura in uso all’Assicurato, salvo i seguenti casi: 

- qualora l'autovettura venga lasciata incustodita dal¬ 
le ore 22 alle ore 6; 

- qualora l’autovettura regolarmente chiusa a chiave 
venga lasciata incustodia dalle ore 6 alle ore 22 e gli 
enti assicurati non opportunamente occultati nel 
bagagliaio. 


c) Limitatamente ai danni di rottura la garanzia è effica¬ 
ce solamente nel caso questi siano dovuti ad un inci¬ 
dente in cui rimanga coinvolto anche il veicolo in uso 
dell'Assicurato che trasportava i beni assicurati. 

d) Per gli enti per i quali non è stato stipulato il contratto 
di manutenzione e/o assistenza con la casa costrut¬ 
trice e/o ditte di essa mandatarie qualora l'ente ri¬ 
chieda per norma del fornitore detto contratto, la 
Società non risponde dei danni verificatisi in conse¬ 
guenza di guasto meccanico e/o elettrico salvo che 
l'Assicurato provi che tale guasto sia causato da even¬ 
to esterno agli enti assicurati o da incendio originato 
da uno di questi enti. 

6) Somma Assicurata 

La somma assicurata per ciascun ente deve corrispondere 
al costo di rimpiazzo, ossia al prezzo di listino della casa 
costruttrice ed escluso ogni sconto o prezzo di favore di 
un ente nuovo, eguale od equivalente per caratteristiche, 
prestazioni e rendimento economico. 

7) Premio 

Per ogni singola applicazione è stabilito un premio forfet- 


tario omnicomprensivo cosi calcolato: 

Somma assicurata 

Premio 

da 2.500.000 a 3.000.000 

L. 

50.000 

da 3.000.000 a 5.000.000 

L. 

65.000 

da 5.000.000 a 7.000.000 

L. 

80.000 

da 7 000.000 a 10.000.000 

L. 

100.000 

da 10.000.000 a 15.000.000 

L. 

120.000 

da 15.000.000 a 20.000.000 

L. 

150.000 


8) Franchigia 

per ogni e qualsiasi danno che colpisca gli enti assicurati è 
stabilita una franchigia di: 

L. 50.000 per somma assicurata fino a L. 5.000.000 
L. 100.000 per somma assicurata superiore a 
L. 5.000.000 

Per sinistri causati da eventi come ai punti g) ed h) delle 
garanzie prestate, la Società liquiderà i danni sotto dedu¬ 
zione di uno scoperto pari al 20% della somma assicurata, 
col minimo delle franchigie sopra stabilite. 

9) Rinvio alle norme di legge 

Per tutto quanto non è qui diversamente regolato, valgono 
le norme di legge. 





e applicando 

vi mettono al sicuro 


Si! Desidero assicurare i miei/il mio computer. Inviatemi a stretto giro di posta il certificato emesso dalla Ras. 
L'assicurazione avrà valore a decorrere dalle ore 24 del giorno di spedizione della mia adesione. Per la data fa fede il 
timbro postale. 


COGNOME. 




NOME . 




INDIRIZZO. 



. N. 

CAP. CITTA' . 


. PROVINCIA. 


Assicuro i/il seguente personal: 
Marca e Modello 

N. di matricola 

Valore (IVA compresa) 



Con le seguenti periferiche (stampanti, video, drive, hard disk, ecc) 

Marca e Modello N. di matricola Valore (IVA compresa) 


Nel caso non abbiate sufficiente spazio ricopiate su un foglio il testo completo di questo tagliando indicando tutti i prodotti che intendete assicurare. 

Per un totale complessivo di Lire.su cui pago il premio calcolato in base alla tabella riportata qui sopra (su fondoverde). 

Allego assegno non trasferibile di Lire.intestato a Editronica srl, Corso Monforte 39,20l22Milano. 













































Listato 2 - CREARE 


10 REM *«**«««««*«««« 

20 REM * CREARE * 

30 REM * Di GARY KNOX « 

« REM * COPYRIGHT (0 1985 * 

50 REM * BY APPLICANDO 4 * 

60 REM * MICRQSPARC, INC * 

70 REM ««****«««««««« 

80 : 

90 REM ««ROUTINE D! PREPARAZIONE*»** 

100 DJ = CHRì <4):Ri = CHRi (13): TEXT ; HOME 
110 IF PEEK (2791) = 15 AND PEEK (2793) = 32 AND PEEK (1 
04) = 64 THEN 140 

120 VTAB 10: PRINT 'UN MOMENTO.": IF PEEK (104) < > 6 

4 THEN POKE 103,1: POKE 104,64: POKE 16384,0: PRINT Dì 
"RUM CREARE' 

130 PRINT DÌ'BLOAD SCRN': PRINT Dì'BLOAD GOLF.SHAPES*: POKE 
232,231: POKE 233,10 
140 DI = 4 

150 DIM SX< 50),SY(50),SH(50 > 

160 DIM NÌ(50),KS(50),DIÌ(50) 

170 HOME 

180 TEXT : VTAB 10: CALI - 868: INPUT “INTRODUCI IL NOME D 
EL PERCORSO ■ ;N»: IF Ni = "" THEN PRINT CHRÌ (4)"RUN 
GOLF' 

190 REM ««CONTROLLA NOME PERCORSO**** 

200 Ni = "G‘ + n$ 

210 FOR ! = 1 TO LEN (Ni): IF ( MIDÌ (Ni,1,1) < "A“ OR MIDì 
(Ni, 1,1) > *2*) AND ( ‘DAL ( MIDì (Ni.1,1» = 0) THEN CALL 
- 958: PRINT 'NOME DEL FILE NON VALIDO': GOTO 180 
220 NEXT 

230 IF LEN (Ni) > 7 THEN CALL - 958: PRINT 'IL NOME DEL 
PERCORSO NON PUD' ESSERE PIU' LUNGO DI SEI CARATTERI 
": GOTO 180 
240 ONERR GOTO 2460 
250 PRINT Dì;"OPEN COURSE.LIST* 

260 PRM su ["READ COURSE. LIST” 

270 INPUT NUM: ! c NLM = 0 THEN 350 

280 FOR K = 1 TO NUM 

290 INPUT Hi,KG 

300 IF Mi < ) N$ THEN 340 

310 VTAB 15: PRINT ■*« SPIACENTE,IL PERCORSO ’ RIGHTÌ (Ni, 

LEN (Ni) - 1): PRINT “«* E' GIÀ' SUL DISCHETTO." 

320 PRINT "*** USA UN ALTRO NOME DI PERCORSO. 1 
330 F =1 : GOTO 350 
340 NEXT K 

350 PRINT Dìi'CLOSE COURSE.LIST' 

360 IF F = 1 THEN F = 0: GOTO 180 
370 : 

380 REM ««CREA BUCA GOLF**** 

390 * 

400 ONERR GOTO 2350 

410 HOME : VTAB 11: HTA8 27: °R!NT "(MASSIMO 10)": VTAB 10: 
INPUT "INTRODUCI NUMERO DI BUCHE DEL PERCORSO *;At:H = 
VAL (Ai): IF tì < = 0 OR H > 10 THEN 410 
420 PRINT : PRINT ; PRINT 'OGNI BUCA RICHIEDE CIRCA 36 SETT 
ORI": PRINT "IL TUO PERCORSO RICHIEDERÀ' *;H * 36j" SET 
TORI/: PRINT : PRINT "CONTINUI? (S/N) * ; : GET Ki: IF K 
ì < ) "S" THEN PRINT : PRINT CHRÌ (4)*RUN GOLF" 

430 FOR KQ = 1 TO H: HGR : GOSUB 1900 

440 : 

450 REM ««RICEVE DATI FIGURA**** 

460 : 

470 FOR K = 1 TO 6 ■ 

480 READ Si,SN,SS,R,CLR 

490 IF K > 2 THEN HOME : VTAB 22: PRINT "C'E GUALCHE ’31‘ 
SULLA': PRINT 'BUCA "KG" ?': VTAB 24: PRINT "INTRODUCI 
3 0 N ':: GET Ai: IF Ai = "N‘ THEN 980 

500 IF K > 2 AND Ai ( > "S" THEN 490 


510 HOME : SCALE= SS: ROT= 0:QQ = SS:R = 0:F = 0 
520 INVERSE 
530 i 

540 REM ««DISESIA LA FIGURA SULLO SCHERMO*** 

550 : 

560 VTAB 22: HTAB (26 - LEN (Sì)) / 2: PRINT 'POSIZIONE " 

Si 

570 NORMAL 

580 l/IAB 23: INPUT -QUANTE RIGHE DALLA SINISTRA “;At:LE = VAL 
(Al) 

590 VTAB 23: CALL - 868: INPUT "QUANTE RIGHE DALL'ALTO ";A 
Ì:LT = VAL (Ai) 

600 X = 10 * LE:Y = 10 * LT - 10: IF X ) 260 OR Y ) 150 THEN 
HOME : VTAB 21: INVERSE : PRINT ‘PROVA ANCORA": NORMAL 
: GOTO 560 

610 IF X < =0 OR Y < = 0 THEN HOME : VTAB 21: INVERSE : 

PRINT "PROVA ANCORA": NORMAL : GOTO 560 
620 R0T= R: XDRAU SN AT X,Y 

630 HOME : VTAB 22: PRINT SÌ":CAMB! LA POSI 2 !Ot-IE( S/N)? " ; : GET 
Ai: 3F Ai = "S" THEN XDRAU SN AT X,Y: GOTO 510 
640 IF Ai < > "N* THEN 630 
650 TX = X:TY = Y 

660 IF K = 2 THEN XDRAU SN AT X,Y: HCOLOR= CLR: DRAU SN AT 
X.Y: GOTO 910 

670 IF K = 3 THEN XDRAU SN AT X,Y: HCOLOR= CLR: DRAU SN AT 
X.Y: GOTO 910 

680 IF K > 3 THEN XDRAU SN AT X,Y; HCOLOR= CLR: DRAU SN AT 
X ,Y : GOTO 880 

690 : 

700 REM ««RUOTA IL TEE**** 

710 : 

720 HOME : VTAB 21: HTAB (23 - LEN (Si)) / 2: INVERSE : PRINT 
"POSIZIONE "Si: NORMAL 

730 VTAB 22: CALL - 868: PRINT ‘R=ORARIO E=ANT1ORARI0 F=F! 
NITO" 

740 CALL - 868: HTAB 10: PRINT "C=CAMBIA POSIZIONE TEE" 

750 XDRAU SN AT X.Y: ROT= R: XDRAU SN AT X.Y 
760 HTAB 1: VTAB 24: CALL - 368: PRINT "PREMI IL TASTO CHE 
VUOI./:: GET Ai 
770 IF Ai = 'p" THEN 910 

7B0 IF Ai = “R" THEN R = R + 8: GOTO 820 

790 IF Ai = “E" THEN R = R - 8: GOTO 320 

800 IF Ai = a C THEN XDRAU SN AT X.Y: GOTO 510 

310 GOTO 760 
820 IF R < 0 THEN R = 56 
830 IF R ; 64 THEN R = 8 
840 GOTO 750 
S50 : 

360 REM ««SPOSlA LA FIGURA**** 

870 : 

380 HOME ;D! = DI - 1 : IF DI > 0 THEN POKE - 16303,0 : GOSUB 
1610: POKE - 16304,0: POKE - 16301,0: POKE - 16297,0 
890 C = 0:TX = X:TY = Y:T! = ! 

900 GOSUB 1690 

910 IF K = ! THEN XT = TX:YT = TY 

920 IF K = 2 THEN XG = TX:YG = TY 

930 ZZ = FRE (0) 

940 IF K < 3 THEN 980 

950 HOME : VTAB 23: PRINT «ALTRO “Si" ? S/N? GET Ai: IF 
Ai = "N" THEN 980 
960 IF Ai ( ) "S" THEN 950 
970 GOTO 510 

980 NEXT K 

990 K = B + 1 

1000 : 

1010 REM ««CANCELLA NUMERI CONFINE**** 

1020 : 

1030 HCOLOR= 0 

1040 FOR J = 151 TO 159: HPLOT 0,J TO 279, J: NEXT J: FOR J = 

0 TO 159: HPLOT 263, J TO 279.J: NEXT J 
1050 HOME : VTAB 21: PRINT "STO SALVANDO LA BUCA "KQ" . 

1060 Èi'= 1 

1070 ONERR GOTO 2350 

1080 PRINT : PRINT D$;"BSAVE"Nì".HOLE"KB‘,AÌ2000,LÌ1FFF" 

1090 “OHE - 16303,0: HOME :C = 0:F = 0 
1100 : 

1110 REM ««DETERMINA IL PAR**** 

1120 : 

1130 VTAB 10: PRINT "PER ESSERE AIUTATO A DETERMINARE IL PA 
R FER LA BUCA "KQ: 

1140 PRINT * DEVI SPOSTARE LA PALLINA’: PRINT "LUNGO IL FAI 
RUAY FINO AL GREEN." 

Continua 
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1150 S0SU8 2020:C = 0:TI = 2 

1160 FOKE -10304,0: “OKE - 16301,0: POKE -16297,0 

1170 CLR = 3:SN = 5: 3CALE= ! 

neo b$ = ” 

1190 C = 0:X = XT:Y = YT:CX = 0:CY = 0 
1200 60SUB 1699 

1210 POKE - 16303,0: HOME : RESTORE 

1220 VTAB 5: PRINT ‘LA DISTANZA FINO ALLA BUCA N. ‘KQ 

1230 MTAB 8: HTAB 15:C = INI (2.2 * C): PRINT C‘ METRI* 

1240 VTAB 12: INPUT ‘INTRODUCI IL FAR CHE VUOI PER QUESTA 
BUCA:"jA$:PAR = MAL (A»): IF PAR < =1 THEN MTAB 2 
2: PRINT ‘PROVA ANCORA...": GOTO 1240 
1250 : 

1260 REM «**METTE 1 DATI SUL DISCHETTO***» 

1270 : 

1280 EL = 2 

1290 PRINT Di;*9PEN“Ni‘,"KQ 
1300 PRINT Dij’URlTE’NiVKQ 
1310 PRINT C;R$;PAR 
1320 PR!N T XT:Ri;YT:RÌ;XG;Ri;YG 
1330 PRINT Dij'CLQSÉ'Ni . KQ 
1340 Q = 0 
1350 NEXT KQ 

1360 TEXT : HOME : MTAB 10: PRINT "UN MOMENTO PREGO.' 

1370 IF NUM = 0 THEN NUM = NLM + 1 : GOTO 1470 
1380 E 1 = 3 

1390 "pRINT Dij’OPEN COURSE.LIST= 

1400 PRINT Di;"READ COURSE.LIST" 

1410 INPUT NUMiNUM = NUM + 1 
1420 POR K = 1 TO NUM - 1 
1430 INPUT NÌ(K),KQ(K) 

1440 NEXT K 

1450 PRINT Di;’CLOSE COURSE.LIST’ 

1460 EL = 4 

1470 PRINT DÌ;’GPEN COURSE.LIST’ 

1480 PRINT Di ;"URITE COURSE.LIST* 

1490 PRINT NLW 
1500 IP NUM = ! T HEN 1540 
1510 c OR K = ! TO NUM - 1 
1520 PRINT NÌ(K);R1;KQ(K) 

1530 NEXT K 

1540 PRINT N$;Ri:H 

1553 PRINT Wj’CLOSE COURSE.LIST’ 

1560 TET : HOME : MTAB 10: PRINT "UN MOMENTO PREGO.’ 

1570 °R!NT DSj’RUN GOLF* 

1530 REM ****ROOT1NE**** 

1590 REM ****ISTRU230N!**** 

1600 : 

1610 MTAB 5: PRINT "PER SPOSTARE LA FIGURA USA QUESTI TASTI 
YTAB 8: PRINT "(ESPOSTA IN ALTO E A SINISTRA": PRINT 
"ESPOSTA IN ALTO’: PRINT ‘E=SP0STA IN ALTO E A DESTRA" 

1620 PRINT "ESPOSTA A SINISTRA": PRINT "D=SPOSTA A DESTRA" 

: PRINT ESPOSTA IN SASSO E A SINISTRA" 

1630 PRINT ’X=SPOSTA IN BASSO": PRINT ’C=SPOSTA IN BASSO E 
A DESTRA*: PRINT : PRINT "F=FiNJTQ DI SPOSTARE ’: PRINT 
"S=CANCELLA ARRE T RANDC‘ 

1640 SCSUB 2020 
1650 RETURN 
1660 : 

1670 REM ****ROUTINE DISEGNO**** 

1630 : 

1690 INVERSE : MTAB 21: HTAB 16: PRINT "3 U E": NORMAL : PRINT 
‘PREMI 'li TASTO*;: INVERSE : HTAB 16: PRINT "A D": HTAB 
16: PRINT ’Z X C’: NORMAL 

1700 PRINT ’P = FINITO B = ARRETRA E CANCELLA*; : MTAB 

1710 Si = ■* 

1720 SET Ai 

ì730 IMI = ’P’ THEN 1860 

1740 SOSUB 2060 

1750 IF Ai < > ’B" THEN 1790 


1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 

1840 

1850 

1860 

1870 

1880 

1890 

1900 


1910 

1920 

1930 

1940 

1950 

I960 

1970 

1980 

1990 

2000 

2010 

2020 


2030 

2040 

2050 

2060 

2070 

2080 

2090 

2100 

2110 

2129 
2:30 
2140 
2150 
2160 
2170 

2130 
.2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2230 

2290 

2330 

2310 

2320 

2330 

2340 

2350 

2360 

2370 


IF Ai = ’B’ THEN HCOL0R= 0: ORAU SN AT X,Y:C = C - 1: 

F = 1 

IF C = <0 THEN Ai = Bi:B$ = “: GOTO 1740 
Ai = RIGHTi (Bi.DiBi = LEFTi <Bi, LEM <Bi> - 1): GOTO 

1740 

IF F = 0 OR TI = 2 THEN 1830 

HCQLOR= 0: DRAM Sii AT X,Y:X = X - CX:Y = Y - CY: HCQLOR= 
CLR:F = 0 
ORALI Sii AT X,Y 
GOTO 1720 

IF TI = 2 AND LEli <B$) = 254 THEN B1 = RIGHTI (Bl, LEN 
(Bi) - !): GOTO 1850 

IF LEN (Bi) = 254 THEN Q = Q * !:SX(Q) = X:SY(Q) = Y: 

TX = X:TY = Y:SH(Q) = SN:D!i(Q) = Bì:Bi = ’’ 

C = C » 1:X = X » CX:Y = Y + CY:Bi = Bi * Ai: HCOLOR= C 
LR: ORALI SN AT X,Y: GOTO 1720 
RETURN 

'REM ««DISEGNA CONFINE**** 

'HCOLOR= 3: HPLOT 0,0 TO 0,150 TO 260.150 TO 260.0 TO 0 
,0: POR KK = 0 TO 260 STEP IO: HPLOT RK.148 TO KR,152: HPLOT 
KK.O TO KK,2: NEXT KK 

HPLOT *,o TO 1,150: HPLOT 259.150 TO 259,0 
FOR KK = 0 TO 150 STEP 10: HPLOT 0,KK TO 2,KK: HPLOT 2 
58,KK TO 263,KK: NEXT KK 

'REM ««DISEGNA NUMERI**** 

'SCALE 3 1: HCOLOR= 3 

POS KK = ! TO 39: READ RR,SN,XC,YC: ROT= RR: ORAW SN AT 
XCjYC: NEXT KK 
RETU9J 

'REM ««RICEVE BATTUTA TASTO**** 

MTAB 24: PRINT ‘PREMI IL IfWERSE : PRINT "TASTO";: 
NORMAL : PRINT " RETURN PER CONTINUARE...’;: GET Ai: HOME 
: RETURN 


REM ««RICEVE SPASTOIENTI DISEGNO**** 


IF Ai = ’Q’ THEN CX = - IsCY = 


li GOTO 2140 


IF Ai = ’W r THEN CX = 0:CY = - 1: GOTO 2140 

IP Ai = ’E' THEN CX = 1:CY = - 1: GOTO 2140 

IF Ai = ’A* THEN CX = - 1:CY = 0: GOTO 2140 

IF Ai = ’O" THEN CX = 1:CY = 0: GOTO 2140 

IF Ai = "2" THEN CX = - IsCY = 1: GOTO 2140 

IF Ai = ’X’ THEN CX = 0:CY = 1: GOTO 2140 

IF Ai = ’C‘ THEN CX = liCY = 1: GOTO 2140 

RETURN 
GOTO 250 

'REM ««DATI NUMERAZIONE FIGURE**** 

'DATA 0,7,265,12,0,8,263,22,0, 9,265,32,0,10,268,42,0, 
11,265,52 

DATA 32,12,268,57,0,13,265,72,0,14,265,82,0,12,265,92 
,0,7,265,182 

DATA 0,6,269,102,0,7,265,112,0,7,270,112,0,7,265,122, 
0 3 ,273 \l2 

DaTÀ o',7,265,132,0,9 ,270,13!,0,7,265,142,0,10,273,14 
2,0,8,21,159 

Data' 0 , 10 , 41 , 159 , 32 , 12 , 81 , 152 , 0 , 14 , 80 , 159 , 0 ,7,98,159, 

0,6,101,159 

Data 0,7, 115 , 159 , 0 , 8 , 123 , 159 , 0 , 7 , 135 , 159 , 0 , 10 , 143,159 

,0,7,255,159 

DATA 32,12.163,152,0,7,175,159,0,14,1SS,159,0,8,199,1 
59.0,6,201,159 

DATA 0,8,219,159,0,8,225,159,0,8,239,159,0,10,244,159 
REM ««DATI FIGURE**** 

'DATA 'TEE*,2,1. 0,3,’GREEN’,15,1, 0,6,'ALBERO’,3,2 
,0,1,’ROUGH‘,4,2, 6,5 

DATA ‘BUNKER",4,2 ,0,7,"OSTACOLO D'ACQUA",3,2 ,5 

8,2 

‘REM *** ROUTINE D'ERRORE *** 

'CALI - 3288:ER = PEEK (222) 

IF ER = 4 THEN PRINT "IL DISCHETTO E' PROTETTO IN SCR 
1TTURA": G0 T 0 2430 

IF ER = 6 THEN PRINT "FILE NOT POUND": GOTO 2430 


■ 
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2380 IF ER = 8 THEN PRINT M/O ERRORE : GOTO 2430 

2390 IF ER = 9 THEN PRINT “DISK FULL': GOTO 243C 

2400 IF ER = IO THEN PRINT ‘FILE PROTETTO 1 : GOTO 2430 

2410 IF ER = I! OR ER = 13 THEN PRINT 'ERRORE 01 NOME DEL 

FILE 5 : INPUT 'INTRODUCI UN NUOVO NOME DI FILE*;N*:N$ = 

'S 1 * Ni 

2420 PRINT "ERRORE N.'jER 1 A LINEA PEEK (218) * PEEK (2 
19) # 256 

2430 PRINT “PREMI UN TASTO QUALUNQUE PER CONTINUARE": GET K 
$: PRINT 

2440 ON EL GOTO 1050,1290,1340,1470 
2450 GOTO 180 ’ 

2440 DALL - 3288: PRINT Di'CLOSE": IF PEEK (222) < > 5 THEN 
PRINT 'DISK ERROR N. 1 ; PEEK (222): PRINT “PREMI UN TAS 
T 0 PER PROVARE ANCORA 1 : GET K$: PRINT : HOME : GOTO 180 
2470 PRINT Dij’CLOSE CCURSE.LIST" 

2480 PRINT Di:"OPEN COURSE.LIST* 

2490 PRINT Dij'URITE COURSE.LIST' 

2500 PRINT 0 

2510 PRINT Dij'CLOSE COURSE.LIST 1 : GOTO 250 




Il dischetto 

con il programma ( vedi Disk Service) 
costa solo 30.000 lire (25.000per gli 
abbonati) e contiene già un percorso 
predisposto. 


TUTTO MIO 

QUESTO 

PERCORSO 




Alcuni esempi di buche realizzate 
con il programma GOLF. E 
possibile inserire lungo il percorso 
tutti gli ostacoli d'acqua o disabbia 
che si vuole, simulare un gruppo di 
alberi che rendano più difficile il 
percorso di una buca, oppure 
piazzare una o due file di piante ai 
margini della buca, sempre al fine di 
rendere il gioco meno facile e quindi 
più interessante e variato. 















































































































Mille programmi 



Stai per acquistare un personal 
computer Apple? 

Vorrai sapere che cosa puoi farci. 
Questo volume è un aiuto indispen¬ 
sabile, una guida ragionata e com¬ 
pleta di tutti i programmi disponibili 
in Italia. Prima di fare il tuo acquisto 
non puoi non consultarlo, perché 
solo se avrai a disposizione il pro¬ 
gramma o i programmi che ti inte¬ 
ressano la tua scelta non ti lascerà 
deluso. 


perle 


Hai appena acquistato un perso¬ 
nal computer Apple? 

Senza questa raccolta di program¬ 
mi non potrai mai sapere quali e 
quanti utilizzi potrai farne. 


Possiedi già da tempo un perso¬ 
nal computer Apple? 

Allora non c’è bisogno di dirti quan¬ 
to può essere prezioso questo libro: 
sai già che il tuo computer, senza 
programmi, è come un'auto senza 
benzina. E poiché non c’è limite alla 
fantasia e all’inventiva, consultando 
questa guida scoprirai utilizzi im¬ 
pensati per il tuo personal. Utilizzi 
che ti permetteranno nel lavoro, nel 
tempo libero, nel gioco o nello stu¬ 
dio, di essere sempre il più aggior¬ 
nato, il più organizzato, il più soddi¬ 
sfatto... 


Ordinale subito. 
Sarai fra i primi 
a riceverle. 


Ritagliare, compilare e 
spedire a: Editronica Srl, 
Corso Monforte 39, 
20122 Milano. 
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Le Pagine del Software 
sono un supplemento 
semestrale di Applicando, 
il mensile per i personal 
computer Apple. 
Acquistarle singolarmente 
costa 12.000 lire. 

Per chi si abbona ad 
Applicando sono in regalo. 
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Desidero ricevere, senza aggravio di spese postali, Le Pagine del Software con la 
seguente formula (segnare la casella di proprio interesse): 

o 12.000 lire per ricevere l’edizione Autunno 1984 de Le Pagine del Software 

o 50.000 lire per ricevere 10 numeri di Applicando e in regalo l’edizione Autunno 1984 
de Le pagine del Software. 
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o Allego assegno non trasferibile di L. mleslaloa Editronica Srl. 
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□ Pago fin d'ora con la mia carta di credilo Bankamericafd N.scadenza 

Data. Firma. 

□ Desidero Iattura. Il mio C.Fise./P iva è. 






















Figura 4 


qui sotto per controllare il colore di un 
punto sullo schermo con le coordinate 
X, Y: 


POKE 2308,INT((X+l)/256) 
POKE 2309,(X+1)-INT((X+1) 
/256)*256 

POKE 2310,INT(Y) 

CALL 2316 
C = PEEK (2314) 


Uno dei valori di colore da 0 a 7 sarà 
memorizzato nella variabile (C). La 
routine può gestire automaticamente 
sia la pagina 1 sia la pagina 2 della 
grafica senza alcuna programmazione 
speciale da parte dell'utente. 

L’istruzione SCRN può rendere il 
numero esatto del colore solo se il 
punto che viene controllato è circon¬ 
dato da altri punti dello stesso colore o 
si trova alla loro periferia. 

Questo problema è causato dal mo¬ 
do in cui i colori vengono tracciati nel¬ 
la grafica ad alta risoluzione. I colori 
dispari appaiono nelle colonne dispari 
e i colori pari appaiono nelle colonne 
pari. 

Modifiche eventuali 

E possibile cambiare i dati delle fi¬ 
gure che si trovano nelle linee 
2300—2310 del programma CREA¬ 
RE. I dati sono organizzati come se¬ 
gue: nome della figura, numero della 
figura, scala, rotazione, colore. 

La tavola delle figure comprende le 
seguenti figure: 


1. Palla 

2. Tee 

3. Albero e acqua 

4. Rough e bunker 

5. Puntino 

6—14. Cifre da 0 a 9 
15. Green 
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Questo programma è disponibile su 
dischetto. L'elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

- * 
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NUOVI PLOTTER GRAFICI 
MULTICOLORI 
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Colorwriter® 


->GOULD BRYANS 


i nuovi plotter digitali colorwriter ■ della Gould Bryans sono stati 
concepiti per offrire a tutti gli utilizzatori che operano 
nel campo della grafica ed in particolare 
del Cad/Cam, la possibilità 
di ottenere velocemente 
disegni e grafici di alta 
qualità fino a 10 colori. 

Sono disponibili in due 
versioni che si differenziano 
solo per il numero delle 
penne e per il formato: il modello DS10 
offre 10 penne/10 colori ed ha formato A3; 
il modello DS7 dispone di 7 penne/7 colori nel formato A4. 
Utilizzano vari tipi di penne tra cui rapidograph, penne per 
fogli trasparenti, pennarelli, ecc. 


Su entrambi i modelli è possibile installare 
l’avanzamento continuo programmato della carta. 
Grazie ad una potente memoria a microprocessore i plotter 
digitali colorwriter sono in grado di utilizzare diverse 
routines che permettono di 
generare cerchi, archi, 
finestre, effetti zoom, rotazioni 
e diversi set di caratteri tra cui 
quello con segni speciali 
per applicazioni nel settore 
scientifico. Offrono una 
memoria standard di 2K bytes, 
espandibile a 16, che 
permette un'alfa velocita di 
acquisizione dei dati trasmessi 

dagli elaboratori. Sono interfacciabili a 
qualsiasi micro e minicomputer, 
mainframe e terminale mediante 
interfacce standard RS232C e ieee- 488. 
Queste unità opzionali sono 
modulari, intercambiabili tra di loro 
e facilmente inseribili in qualsiasi 
momento. 


Siamo a vostra disposizione per dimostrazioni, maggiori 
informazioni e chiarimenti. Contattateci. 



s.r.i. teriferiche e Strumenti elettronici 


collegata dell'elettronucleonica 
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Per chi 

comincia 



N uovi lettori, siate i benvenuti. Queste 
pagine sono per voi, e le ripeteremo a 
ogni numero per facilitare il primo incontro 
con Applicando e con il mondo di Apple. 
Ovviamente queste righe non intendono 
sostituire i manuali, dei quali consigliamo 
caldamente la lettura, ma possono bastare 
per chi intende soltanto utilizzare i pro¬ 
grammi che pubblichiamo, copiarli, salvar¬ 
li su dischetto e farli partire. 

Cominciamo con qualche rapidissima 
premessa su Apple //. Quando accendete 
per la prima volta il vostro Apple con un 
dischetto già inserito nel drive e la tastiera 
posizionata sull’inglese (per chi possiede 
Apple //e e Ile), dovreste veder comparire 
sullo schermo il segno chiamato curso¬ 
re, o prompt, in inglese. Mentre se avete la 
tastiera posizionata su italiano, vedrete é. 
La sua presenza significa che potete fare 
una di queste tre cose: 

1) Fornire al computer comandi destinati 
al drive (per esempio CATALOG mostra il 
contenuto del dischetto, se si tratta di un 
dischetto in Basic). 

2) Fornire comandi nella versione per 
Apple del linguaggio Basic (e cioè l’Apple- 
soft Basic). 

3) Battere sulla tastiera righe di pro¬ 
grammi in Applesoft Basic. 

Per copiare un programma da Applican¬ 
do potrà essere necesario fare tutte e tre le 
cose. 

Per battere un programma 

di Applicando 

Per prima cosa sarà opportuno leggere 
fino in fondo l’articolo che accompagna il 
programma. Può darsi che non capiate pro¬ 
prio tutto la prima volta: non preoccupate- 
vene, in seguito diventerà facilissimo. Cer¬ 
cate soprattutto le eventuali istruzioni che 
spiegano se occorre fare qualcosa di parti¬ 
colare per battere il programma. In ogni 
caso assicuratevi di aver pronto un dischet¬ 
to già inizializzato per poter salvare quel 
che avrete battuto. Per i dettagli su come 
inizializzare un dischetto vergine, guardate 
i manuali: chi proprio ai manuali fosse al¬ 
lergico, faccia così: a Apple spento inseri¬ 
sca il dischetto System Master nel drive 1, e 
accenda il computer: quando il drive avrà 
smesso di girare (lueina rossa di nuovo 
spenta), tolga il System Master dal drive e 
inserisca al suo posto un dischetto sicura¬ 
mente vergine e sicuramente mai usato (at¬ 
tenzione: si possono ri—inizializzare anche 
dischetti già usati, ma il loro contenuto va 
irrimediabilmente perso); ora basta battere 
NEW, Return, e poi INIT F1ELLO, sem¬ 
pre seguito da Return. 

Tutti i programmi in Basic consistono di 
una sequenza di righe di istruzioni. Tutte le 


righe sono numerate all'inizio, e possono 
contenere una o più istruzioni. Se le istru¬ 
zioni sono più d’una, esse saranno separate 
da segni di due punti (:). Per esempio: 


20 FOR J = 1 TO 5 : P R I N T 
CHR$(7):NEXT J 


Per copiare da Applicando un program¬ 
ma, inserendolo nel vostro Apple, occorre 
assicurarsi che la memoria operativa del 
computer sia vuota battendo NEW Return 
(questa istruzione non cancella nulla di ciò 
die è registrato sui vostri dischetti: libera 
soltanto la memoria del computer dall’ulti¬ 
mo programma usato), ed è necessario poi 
battere i listati così come sono stampati, 
riga per riga, compresi i numeri di riga, 
battendo Return solo quando si arriva al 
numero di riga successivo. Quando sarà 
stata copiata anche l’ultima riga e l’ultimo 
Return (a fine riga), si potrà salvare il pro¬ 
gramma su dischetto (il dischetto che avete 
inizializzato, o un altro già inizializzato in 
precedenza su cui ci sia spazio libero a suffi¬ 
cienza). Per salvarlo basterà battere il co¬ 
mando SAVE, seguito dal nome che inten¬ 
dete dare al programma che avete trascrit¬ 
to. Questo è tutto, ma vediamo passo per 
passo un esempio. 


10 REM CAMPANELLO 
20 FOR J = 1 TO 5 : P R I N T 
CHR$(7):NEXT J 
30 END 

Listato 1 


Per battere il semplice programma Cam¬ 
panello del listato 1 (produce solo un suono 
simile a quello di un campanello, null’al- 
tro), si seguirà questa sequenza: 

1) Battete NEW Return per cancellare 
dalla memoria qualsiasi programma prece¬ 
dentemente usato. (Se state lavorando su 
un Apple Ile o un Ile assicuratevi che il tasto 
CAPS LOCK, il primo in basso a sinistra, 
quello che permette di ottenere tutte maiu¬ 
scole, sia schiacciato). 

2) Battete la linea 10 esattamente com’è 
stampata e premete il tasto Return solo alla 
fine dell’ultima parola (CAMPANELLO). 

3) Battete allo stesso modo anche le linee 
20 e 30. 

4) Con un dischetto già inizializzato nel 
drive (nel drive 1, se ne avete due), battete 
SAVE CAMPANELLO Return, per regi¬ 
strare il vostro programma su dischetto. 

5) Poiché il vostro programma è ancora 
nella memoria del computer, per farlo gira¬ 
re basterà battere RUN e premere il tasto 
Return. Se cancellate la memoria facendo 
girare un altro programma o spegnendo il 


computer, per usare nuovamente il pro¬ 
gramma occorrerà inserire il dischetto nel 
drive e battere RUN CAMPANELLO Re¬ 
turn. 

Alcuni suggerimenti 

I suggerimenti che seguono possono ren¬ 
dere il lavoro di trascrizione un po’ più 
facile: 

1) Se commettete un errore di battitura 
in una riga e non avete ancora premuto il 
tasto Return, basterà tornare indietro con 
la freccetta sinistra, correggere l’errore, e 
tornare al punto in cui eravate con la frec¬ 
cetta destra, premendo Return come al so¬ 
lito solo a completamento dell’intera riga. 
Se invece vi accorgete dell’errore quando 
ormai avete premuto Return e siete passati 
a un’altra riga, completate tranquillamente 
la riga che state scrivendo, compreso il Re¬ 
turn finale; poi ribattete la riga in cui avete 
commesso l’errore: ribattetela per intero, 
con numero di riga e tutto il resto, e la 
nuova versione prenderà automaticamente 
il posto della vecchia. 

2) Siate particolarmente attenti a non 
commettere errori di trascrizione nelle ri¬ 
ghe in cui compare l’istruzione DATA. 
Nelle altre istruzioni un eventuale sbaglio è 
più facile da individuare, perché penserà 
eventualmente il computer a segnalarlo in 
seguito, nelle istruzioni DATA questo in¬ 
vece non avviene. 

3) Salvate periodicamente il programma 
mentre procedete, per minimizzare i guai 
di una eventuale interruzione di corrente. 
Se non avete tempo per trascrivere tutto il 
progamma, trascrivete fin dove potete o 
volete (ma comunque completando fino al 
Return la riga che state battendo), poi sal¬ 
vatelo su dischetto come se aveste finito. 
Per riprendere a trascrivere sarà sufficiente 
inserire il dischetto nel drive, accendere il 
computer, e battere LOAD seguito dal no¬ 
me che avete dato al programma, e da Re¬ 
turn (battete CATALOG se non ricordate 
più con che nome avete salvato il program¬ 
ma). La luce rossa sul drive si accenderà, e 
il vostro programma verrà caricato nella 
memoria operativa del computer. A questo 
punto battete LIST, e vedrete scorrere sul¬ 
lo schermo tutta la parte del programma 
che avevate già battuto. Continuate adesso 
tranquillamente dal punto in cui avevate 
interrotto. 

4) Prima di effettuare modifiche o ag¬ 
giunte, trascrivete l’intero programma e fa¬ 
telo girare per prova. Questo renderà più 
facile la ricerca di eventuali errori, isolando 
quelli commessi durante la battitura e la 
trascrizione. Non preoccupatevi per il nu¬ 
mero di errori di trascrizione che farete: è 
normale. Il computer vi segnalerà, riga per 
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riga, dove avete sbagliato. Basterà a questo 
punto controllare la riga, individuare l’er¬ 
rore commesso e ribattere correttamente 
l’intera riga. A questo punto occorre salva¬ 
re di nuovo il programma su dischetto. 

5) Le lettere minuscole possono essere 
usate solo aH'interno di comandi che inclu¬ 
dono REM o tra virgolette. 

Programmi in 
linguaggio macchina 

Il Basic e il Dos sono ottimi linguaggi, 
ideati apposta per rendere più facile la pro¬ 
grammazione, ma l’Apple è in grado di 
ricevere comandi anche in un codice molto 
più vicino alla sua logica, chiamato linguag¬ 
gio macchina. Il linguaggio macchina è un 
po’ la lingua madre dell’Apple, un pro¬ 
gramma così composto sarà quindi compre¬ 
so dal computer molto più velocemente di 
un programma scritto in Basic. Per creare 
programmi in questa lingua si usa spesso un 
programma chiamato Assembler. L’As¬ 
sembler permette al programmatore di 
scrivere in un codice più facile del linguag¬ 
gio macchina: l’assembly. In un secondo 
momento il programma stesso si tradurrà in 
linguaggio macchina. L’Apple infatti non 
conosce l’assembly. 

Molti dei programmi che troverete su 
APPLICANDO saranno scritti in ambe¬ 
due le versioni: assembly e linguaggio mac¬ 
china; in questo modo potrete inserire le 
istruzioni direttamente in linguaggio mac¬ 
china, senza dovervi procurare il program¬ 
ma Assembler. In questo caso le istruzioni 
dovranno essere inserite direttamente nel 
System Monitor (da non confondere col 
monitor video): per raggiungere il System 
Monitor è sufficiente battere CALL—151 e 
schiacciare il tasto Return. A questo punto 
sullo schermo comparirà un asterisco (*) 
che indica che è stato raggiunto il contatto 
con il System Monitor. Per inserire i listati 
scritti in linguaggio macchina occorrerà al¬ 
lora battere, per esempio, i seguenti co¬ 
mandi: 


300: A2 05 20 DD FB CA F0 03 4C 02 03 60 
Return 


In questa serie di istruzioni il ’300’ indica 
una locazione di memoria e i due punti 
dicono all’Apple di inserire i seguenti nu¬ 
meri (A2 e gli altri numeri in base 16) in 
quella locazione. I numeri sono in base 16 
(esadecimale); non è necessario saper cal¬ 
colare con questa base per trascrivere i pro¬ 
grammi in linguaggio macchina, ma è im¬ 
portante sapere che in questo tipo di lin¬ 
guaggio i numeri sono dati sempre in esade¬ 
cimale. 

Facciamo un breve esempio di program¬ 
ma scritto in linguaggio macchina. Il se¬ 
guente listato serve a indirizzare alcuni dati 
in una particolare locazione di memoria: 


300.30B 

0300-A2 05 20 DD FB CA F0 03 
0308-4C 02 03 60 

Listato 2 


I numeri a sinistra delle lineette (atten¬ 
zione: le lineette non vanno digitate, al loro 
posto occorre battere un "due punti") sono 
le locazioni di memoria, vale a dire gli indi¬ 
rizzi dello spazio di memoria in cui il dato 
dovrà essere conservato, e i numeri seguen¬ 
ti sono il contenuto, i dati da memorizzare 
nelle sette locazioni di memoria indicate. I 
due numeri separati da un punto presenti 
nella prima riga indicano gli indirizzi inizia¬ 
li e finali della parte di memoria considera¬ 
ta. Questo programma è la traduzione del 
listato numero tre, scritto in assembly. Co¬ 
me si noterà le colonne a sinistra sono mol¬ 
to simili al listato numero due, contengono 
infatti le locazioni di memoria, mentre la 
parte a destra contiene istruzioni in assem¬ 
bly. Esistono diversi programmi assembler 
e diverse disposizioni dei listati, ma in tutti 
sono presenti queste due diverse colonne. 


1 *RINGER PROGRAM 



2 

ORG 

$300 


3 

BELL EQU 

SFBDD 

0300: A2 05 

4 

LDX 

#$5 

0302: 20 DD FB 5 

LOOP JSR 

BELL 

0305: CA 

6 

DEX 


0306: F0 03 

7 

BEQ 

END 

0308: 4C 02 03 

8 

JMP 

LOOP 

030B: 60 

9 

END RTS 



Listato 3 


Per inserire i listati nella macchina è suf¬ 
ficiente eseguire le seguenti operazioni: 

1) Digitare CALL—151 Return per en¬ 
trare in contatto con il System Monitor, poi 
inserire la locazione di memoria, i due pun¬ 
ti e il contenuto della memoria; nel caso del 
listato numero due ad esempio si digiterà: 


300:A2 05 20 DD FB CA F0 03 Return 
308:4C 02 03 60 Return 


Un programma in Assembler sarà invece 
così inserito: 


300:A2 05 Return 
302:20 DD FB Return 
305 :CA Return 
306:F0 03 Return 
308:4C 02 03 Return 
30B:60 Return 


State attenti a non inserire lo spazio tra i 
due punti e il primo numero seguente, 
mentre invece bisogna mettere lo spazio fra 
le coppie di numeri. 

2) Una volta inserito l’intero listato, 
schiacciate CTRL—C Return per tornare al 
livello BASIC indicato dal segno ’]’. 

3) Al contrario dei programmi in BASIC 
che iniziano nella stessa locazione di me¬ 
moria, e che possono essere salvati con un 
semplice SAVE, i programmi scritti in lin¬ 
guaggio macchina possono iniziare in di¬ 



versi punti della memoria. Per salvare lista¬ 
ti o dati in linguaggio macchina si dovrà 
indicare quindi la locazione alla quale ha 
inizio il programma da salvare e la lunghez¬ 
za dello stesso (in decimale o in esadecima¬ 
le). Per il programma usato prima come 
esempio, il comando sarà: 


BSAVE RINGER. AS300. L$C 


dove AS300 è la locazione di memoria di 
inizio programma e L$C è la lunghezza del 
programma (la lettera C corrisponde al nu¬ 
mero decimale 12). All’inizio dei listati in 
linguaggio macchina pubblicati su Appli¬ 
cando troverete sempre l’indicazione della 
locazione di memoria di inizio e fine pro¬ 
gramma; esempio: 300.3EA mentre nel 
corso dell’articolo troverete i parametri per 
salvare il programma, esempio: BSAVE 
RINGER, A$300,L$C. 

4) Per rivedere il listato che avete tra¬ 
scritto basterà battere 300.30B, e sullo 
schermo si riprodurrà tutto ciò che avete 
battuto. Per ottenere una copia sulla stam¬ 
pante, basterà battere PR # (£ se siete in 
tastiera italiana) seguito dal numero dello 
slot al quale avete collegato la stampante 
(normalmente il n. 1) Return e poi ancora 
300.30B Return. Le correzioni si fanno ri¬ 
battendo solo la riga contenente eventuali 
errori. 

5) Per far girare il programma basterà 
allora digitare BRUN RINGER, senza 
l’indirizzo. 

Quanto esposto sopra è valido sia per il 
DOS 3.3 (sistema operativo per la gestione 
del drive che veniva fornito prima dell’usci¬ 
ta del Ile) sia per il ProDOS (sistema opera¬ 
tivo fornito con il //c). Usando il ProDOS 
occorre però fare alcune precisazioni. 

I comandi del tipo SAVE, LOAD, 
RUN, CATALOG, ecc. vengono accettati 
anche in forma minuscola. 

Per formattare un disco non si potrà più 
usare il comando INIT HELLO, ma sarà 
necessario usare il disco UTILITIES di Si¬ 
stema fornito con il computer. Durante 
questa operazione vi verrà chiesto se il no¬ 
me del disco, assegnato automaticamente 
dal computer, va bene oppure se volete 
cambiarlo. Infatti tutti i dischi formattati in 
ProDOS (indicati come Volume) hanno un 
nome e vengono riconosciuti indicando 
questo nome dopo un comando diretto al 
drive. Per esempio se volete vedere il cata- 
log di un disco chiamato BLANK, dovete 
bàttere CAT/BLANK. 

Per non ripetere continuamente il nome 
del disco potete battere, prima dei comandi 
diretti al drive, PREFIX/nome disco segui¬ 
to da RETURN. Da questo momento tutti 
i comandi al drive saranno diretti automati¬ 
camente al disco scelto. 

Per vedere il catalog è sufficiente battere 
CAT. 

Durante l’uso di alcuni programi scritti in 
ProDOS potreste trovarvi una richiesta del 
tipo "PATHNAME?"; non spaventatevi, il 
pathname è il nome del disco al quale vo¬ 
gliamo fare riferimento, scritto entro due 
barrette (/) e seguito dal nome del file che 
vogliamo salvare o caricare in memoria op¬ 
pure trasferire da un disco a un altro. 
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• Front desk 

Ideale per uno studio di professionisti, per esempio 
avvocati, piuttosto che per un laboratorio di analisi, questo 
programma tiene gli appuntamenti di più persone, calcola 
già le entrate per ogni servizio o prestazione e poi le 
somma fra di loro. È predisposto inoltre per scrivere brevi 
rapporti. Un altro utile utilizzo potrebbe dimostrarsi la 
gestione, per esempio, di un istituto fisioterapico dove 
lavorino 10 persone: diventerebbe estremamente facile 
prendere gli appuntamenti, vedere il tal giorno chi è libero 
alla tal ora, e così via. Prodotto da Layered è commercia¬ 
lizzato in Italia, nella versione tradotta, da J. Soft, Via 
Rosellini 12, Milano. Costa 358.000 lire, IVA compresa. 



• Basic 2.0 

Scrivere programmi in basic con Macintosh è da oggi più 
facile con la release 2.0 dell’ormai noto package della 
Microsoft. È possibile aprire facilmente delle finestre nello 
stile Mac, oppure fare l’editing del programma evidenzian¬ 



do con la freccia comandata dal mouse la parte che si vuole 
modificare o, ancora, con i comandi find e replace ricerca¬ 
re tutta una serie di istruzioni o sostituirle con altre. È 
inoltre possibile controllare l’esecuzione del programma 
aprendo una finestra direttamente nel listato. Il Basic 2.0 
contiene già sul dischetto una serie di programmi dimo¬ 
strativi e di utilità. Distribuito in lingua originale da J. Soft, 
Via Rosellini 12, Milano e da Southern Computer, Via 
Molino 2, Montorfano (CO), costa 378.000 lire. 


• Da Vinci Landscapes 

Si chiama Da Vinci Landscapes, è un programma dedi¬ 
cato agli architetti che permette, con un dito, di disegnare 
paesaggi, viste dall’alto, rasoterra, interni, esterni, edifici, 
appartamenti, uffici, arredamenti. La serie Da Vinci, uti¬ 
lizzabile con l’ausilio del Mac Paint, consiste in tre diversi 
programmi riguardanti fondamenta e strutture edilizie 
(programmi Buildings e Building Blocks), interni (pro¬ 
grammi Interiors e Commercial Interiors) ed esterni (pro¬ 
gramma Landscapes). Per ciascuno di questi utilizzi sono 
memorizzati dei set di immagini elaborate da abili disegna¬ 
tori con il Mac Paint: in pratica, delle figure trasferibili 
componibili sullo schermo. Ogni singolo programma con¬ 
tiene circa venti pagine con un centinaio di figure pronte 
per essere utilizzate negli sviluppi di una composizione. 

Buildings, che costa 129.000 lire, permette di creare 
mura, terrazzi e frontali che possono essere presi a blocchi 
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34170 GORIZIA -CORSO ITALIA, 149-TEL. 0481/30909 

Accessori per 11 vostro App le 

Solo per Apple Ile - espansione 64K + 80 colonne al prezzo 
eccezionale di Lire 220.000 

novità*: 

Ta s tiera profegsiQnqto_ 90 tasti ± 50 comandi basic +12 

tasti funzio n a + 10 tasti definibili da voi Lire 298 000 
Tavoletta grafica c ompleta di software L. 235.000 
Tako - un click e potrete usare l'altra faccia del vostro dischetto 
Lire 25.000 

BUFFSa P22 STAmPÀTlTX 

Utilissimi per risparmiare tempo ed utilizzare al massimo il 
vostro computer Indispensabili per chi usa molto la 
stampante. Vi permettono di usare il computer mentre il Buffer 
manda alla stampante i dati che ha immagazzinato, 
nelle versioni 

Alimentato dalla stampante - da Centronics a Centronics con 
capacita' di 8 K Lire 250 000 

Alimentato a 220 V - da Centronics a Centronics con capacita' 
di 16 K e comando di Reset Lire 315 000 
Come sopra ma con capacita' di 32 K Lire 370.000 
Come sopra ma con capacita' di 64 K Lire 470 000 

Buffer da 64 k espandibile sino a 256 K ingresso seriale uscita 
Centronics Lire 680.000 

Stessa ma ingresso Centronics ed uscita seriale L 680 000 
Stessa ma ingresso seriale uscita seriale L 730 000 

AOCKSSOai VAill 

r - 

Disk Drive slim: L. 450.000 
Doppio controller L. 100.000 
Lanauaoe cord 16 K: L. I lO.OOol 
-- Z-80 p or CP/IT1: L. llSOOCtf . 

80 colonne con soft switch~L 220 000 
Super Serial C ard con cavo di collegamento: L. 170.000 
Interfaccia Centronics per Epson - Tallo - Star con grafica a 
sole Lire il 8.000 

Scheda per far parlare la vostra mela con softw: L. 90 000 
Programmatore di EPROm (2716-2732-2764): L. 120 000 
Scheda Pai Color con suono: 95.000 
1 28 K RAID : L. 380.000 

Wild Card per Apple II plus e compatibili (per copiare tutti i 
programmi): L. 90.000 

Replau: la piu' potente scheda per copia per Apple II plus e 
compatibili L. 158.000 

Joustick autocentranti: L. 42.000 

FLOPPY DISI 

In scatole da 10 pezzi tutti con anello di rinforzo: 

TIPO I1ASHUA mEmOREX 3m-SCOTCH 

SF-SD L. 40.000 L. 50.000 L. 55.000 

DF-DD L. 58.000 L. 68.000 L. 68000 

Kit 3m per la pulizia delle testine del vostro drive a L. 55000 

SOPTWABB PSB mAGJnTOSH 

Chiedeteci la lista II 


Vendita per corrispondenza. Tutti I prezzi indicati 
comprendono UVA. nessuna spesa di spedizione per ordini 
superiori alle 50000 Lire. Prezzi soggetti a variazioni 


VISITATE IL nOSTRO COfllPUTER SHOP PER TROVARE LE 
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e visualizzati in tre dimensioni con il programma Building 
Blocks (210.000 lire) ; per l’arredamento e le rifiniture 
interne serve invece il disco Interiors che mette a disposi¬ 
zione sedie, tavoli, letti, armadi, vasche da bagno, scriva¬ 
nie d’ufficio ecc. e che può essere efficacemente affiancato 
da Commercial Interiors per ordinare lo spazio e gli oggetti 
con una scala standard alla quale corrisponde un tasto per 
ogni valore. Il primo costa 129.000, il secondo 537.000 lire. 
Per completare la mappa di una casa è poi possibile, usan¬ 
do il programma Landscapes, 129.000 lire, progettare co¬ 
me disporre le piante in giardino e le strutture esterne in 
genere. Caratterizzata da una grande versatilità di coman¬ 
di, la serie Da Vinci è un prodotto della Hayden Software e 
si può richiedere presso: Southern European Computer, 
Via Molino 2, Montorfano (CO). 


• Management Edge 

Nato in aiuto ai problemi gestionali dei manager. Mana¬ 
gement Edge spazia il suo campo d’azione da situazioni 
specifiche come l’aumento della produttività o un’ottimiz¬ 
zazione delle prestazioni, fino ad arrivare a un equilibrio 
nei rapporti lavorativi; in altre parole, come riuscire, da un 
lato, a disciplinare i rapporti con i diretti dipendenti, dal¬ 
l’altro ad avere più influenza con i propri superiori. Impo¬ 
stato su una simulazione delle situazioni, Management 
Edge costa 648.000 lire, è un prodotto Human Edge Soft¬ 
ware e in Italia si trova presso la Southern European 
Computer, Via Molino 2, Montorfano (CO). 


• Communication Edge 

Capita di trovarsi in situazioni particolari dalle quali è 
difficile districarsi: un incontro per un affare delicato, una 
riunione decisionale o anche solo un appuntamento galan¬ 
te. Per avere un aiuto su come comportarsi, ma soprattutto 
su cosa dire, basta simulare la situazione sul fido amico 
Mac: il programma Communication Edge vi domanderà il 
tipo di persona che andrete a incontrare e cosa volete che 
emerga dalla conversazione consigliandovi la strategia di 
comunicazione più opportuna. È una produzione Human 
Edge Software, in Italia è distribuito dalla Southern Euro¬ 
pean Computer, Via Molino 2, Montorfano (CO). Costa 
505.000 lire. 


• Daisy Wheel Connection 

Programma molto flessibile che collega il Macintosh con 
una vasta gamma di stampanti di tipo "Margherita", tra¬ 
sformando la stampa "dot matrix" in "qualità corrisponden¬ 
za". Il package comprende un’interfaccia verso il Mac, un 
cavo (che può essere indifferentemente usato sulla porta 
stampante o sulla porta modem del Macintosh), un disco 
programma e un disco di back—up manuale. Compatibile 
con MacWrite, con Microsoft’s Multiplan e con tutti i 
programmi che stampano normalmente attraverso il driver 
ImageWriter, il Daisy Wheel Connection può essere usato 
con le seguenti stampanti: Apple Daisy Wheel, Brother 
HR series, Comrex CR II, Daisywriter, Diablo 630, Nec 
2010, Qume LetterPro 20, Qume Sprint (e compatibili). 
Distribuito in Italia a 357.000 lire dalla Southern European 
Computer, Via Molino 2, Montorfano (CO), è prodotto 
dalla Assimilation Processes. 
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MICROSOFT. 

il software di alta prestazione 


Ora disponibile sul mercato italiano 



MICROSOF FILE 

Finalmente disponibi¬ 
le, Microsoft File va a 
integrare la famiglia Mi¬ 
crosoft composta dal 
Basic, Multiplan, Chart 
e Word. Usato con il 
Word, il File permette 
di personalizzare un 
mailing. Crea archivi 
che combinano date, 
numeri, testi e immagi¬ 
ni. Permette di perso¬ 
nalizzare i formati secondo le strutture e le forme più indicate Visualizza 
le tabelle prima della stampa. Lit. 447.000 IVA compresa. 



MICROSOFT WORD 

Word Processor molto 
potente, il WORD della 
Microsoft associa la 
semplicità d'uso alla 
grande molteplicità di 
funzioni per l'elabora¬ 
zione dei testi. Con un 
manuale d istruzioni e 
in opzione il Microsoft 
Mouse, permette di uti¬ 
lizzare fino a otto fine¬ 
stre per volta e dà la 



possibilità in qualsiasi momento di ottenere delle hard copy dello scher¬ 
mo. Lit. 447.000 IVA compresa. 



MICROSOFT CHART: (Microsoft). Scelta fra 40 tipi 
di diagrammi e rappresentazioni grafiche. Lit. 297.000. 

MULTIPLAN: (Microsoft). Completo per pianificare, 
previsioni e simulazioni. Lit. 449.000. 


MAC BASIC: (Microsoft). Versione 2.0. 
Lit. 297.000 


Prezzi validi solo fino al 31 marzo 1985 


Distribuito in Italia da 


Slolu 








Via Molino 2, 22030, Montorfano (Como). Telefono (031) 200621. Telex 340422 WTC-I-SEC 











































































Nota spese 
in 3 minuti 


C ompilare una nota spese è oggi 
molto più complesso di quanto 
accadeva in passato. Infatti la legisla¬ 
zione fiscale è divenuta in proposito 
severa e non ammette leggerezze, pe¬ 
na salate multe se non peggio. Quindi 
ogni volta che si deve presentare una 
nota spese, tutto deve essere docu¬ 
mentato e calcolato. Il modello in Ap- 
pleWorks/VisiCalc che proponiamo in 
questo articolo, per quanto semplice e 
facilmente realizzabile anche dai me¬ 
no esperti, può risultare di grande uti¬ 
lità e può far risparmiare sulla compi¬ 
lazione di una nota spese settimanale 
anche oltre un’ora di tempo. 

Eseguita la consueta procedura di 
inserire VisiCalc o AppleWorks e di 
scegliere l’opzione nuovo file — 
Spreadsheet, posizionatevi in Al, pre¬ 
mete mela vuota L per entrare nel mo¬ 
do LAYOUT, scegliete l’opzione CO¬ 
LONNE, poi DIMENSIONE CO¬ 
LONNE, quindi RETURN e, pre¬ 
mendo ripetutamente mela vuota e 
freccia sinistra riducete la colonna A 
alla dimensione minima di una 
battuta. 

Purtroppo chi usa VisiCalc non ha la 
possibilità di restringere o allargare 
una sola colonna a suo piacimento. 

A questo punto, sempre rimanendo 
in Al, battete " (virgolette alte) per 
entrare nel modo LABEL (testo) e ! 
(punto esclamativo), RETURN. Poi 
la seguente sequenza: mela vuota D, 
RETURN, RETURN, spostate il cur¬ 
sore in A2,. (punto), spostate il curso¬ 
re fino ad A41, RETURN. Avrete co¬ 
sì creato una riga verticale di punti 
esclamativi che serviranno a delimita¬ 
re graficamente a sinistra il modello. 
Chi usa VisiCalc, al posto di mela vuo¬ 
ta, prema R. 

E bene richiamare l’attenzione, a 
questo punto, su un utilissimo coman¬ 


do che abbiamo appena utilizzato. In¬ 
fatti, premendo . (punto) in fase di 
duplicazione, ottenete di duplicare i 
contenuti di una casella in tutte le ca¬ 
selle che evidenziate successivamente. 
E questo vale sia per AppleWorks sia 
per VisiCalc. 

Nel caso appena visto, non si può 
apprezzare in pieno l’utilità di una si¬ 
mile scorciatoia, se non quella del ri¬ 
sparmio relativo di tempo, poiché ab¬ 
biamo duplicato del testo (il punto 
esclamativo), ma quando si duplicano 
le formule, poiché per ogni formula il 
programma richiede se si tratta di dati 
relativi o uguali, il risparmio di tempo 
e soprattutto una più esigua possibilità 
di commettere errori appaiono evi¬ 
denti, in quanto basta dare l’imput di 
relativo o uguale una sola volta. 

Posizionatevi in Bl, battete " (virgo- 
lette alte) e una riga di — (trattini) fino 
a LI, sempre per dare una elegante 
impostazione grafica al modello. 

Nella colonna B ricopiate tutti i testi 
della figura I, comprese le righe di 
trattini (potete duplicarle dalla prima 


riga che avete già fatto). Naturalmen¬ 
te potete sostituire alcune voci secon¬ 
do le vostre personali esigenze. 

Ricordate che se un testo (per esem¬ 
pio proprio il primo che dovrete rico¬ 
piare: NOTA SPESE SETTIM.)è più 
largo della colonna, non ci sono pro¬ 
blemi, in quanto con AppleWorks si 
va automaticamente a scrivere nella 
colonna a fianco, mentre, se state 
usando VisiCalc, dovete spostare il 
cursore nella casella a fianco, usando 
freccia destra, battere ancora " per en¬ 
trare nel modo LABEL e riempire di 
testo questa seconda casella. E così 
via. 

Posizionatevi ora in D5 e scrivete 
LUN. Poi in E5, dove scriverete 
MAR, e così via fino a completare i 
sette giorni della settimana. 

Affinché vengano scritte automati¬ 
camente le date dei giorni relativi al 
rimborso, posizionatevi nella casella 
sotto MAR (E6) e scrivete la seguente 
formula: 1+E6; nella casella F6 scri¬ 
vete invece la formula I+F6, e così via 
fino alla casella sotto DOM, cioè la 


Quanto impiegate in genere per compilare una nota spese? 
Un’ora? Di più? Con questo modello, che fa parte del corso di 
utilizzo di AppleWorks e VisiCalc, non solo farete un passo 
avanti nell’uso di questi eccezionali programmi, ma 
risparmierete un sacco di tempo... 
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presenta il suo catalogo software per Macintosh 

Prezzi validi solo fino al 31 marzo 1985 


Software di sistema 

AZTEC C68K: (Manx Software). Compilatore C 
per il MAC. Lit. 555.000. 

• HIPPO C: (Hippopotamus Software). Editore 
Compilatore C MAC. Lit. 450.000. 

• MACForth II: (Creative Solution). Linguaggio 
di sviluppo, supporta come subroutine le inter¬ 
facce utente MAC. Lit. 328.000. 

MAC BASIC: (Microsoft). Versione 2.0. Lit. 
297.000. 

MAC PASCAL: (Apple Computer). Non ancora 
quotato. 

MAC Tools: (Central Point Software). Tutte le 
funzioni del FINDER. inoltre protegge e copia file 
protetti oltre a creare file invisibili. Lit. 119.500. 

• MACASM: (Mainstay). Macroassembler con 
editor. Lit. 259.200. 

Gestione archivi: 

DS MASTER: (Stoneware). DEMS che gestisce 
un milione di records su 44 dischetti con tempo di 
ricerca di un secondo. Lit. 431.500. 

• FILEVISION: (Telos). Archivio grafico alfanu¬ 
merico. Lit. 494.500. 

HABADEX: (Haba Systems). DEMS con agen¬ 
da. calendario e funzioni d'ufficio. Lit. 476.500. 
HELIX: (Odesta). Archivio dinamico che accetta 
dati senza limiti di dimensione e formato. Lit. 
696.000. 

• MAIN STREET: (Main Street Software). Ar¬ 
chivio con report generator più agenda. Lit. 

554.500. 

MEGAFILER: (Megahaus). Gestione archivi 
compatibile con MACWrite. Lit. 494.500. 

• MICROSOFT FILE: (Microsoft). Archivio con 
uso del mouse. Lit. 447.000. 

OMNIS 1-2-3: (Blyth Computers). DBMS modu¬ 
lare, 10 campi indicizzati per record, funzioni lo¬ 
giche e matematiche, report ed applicati on ge¬ 
nerator. Lit. 2.667.000. 

• PFS FILE: (Software Publishing). DBMS per 
chi inizia. Lit. 267.000. 

• PFS REPORT: (Software Publishing). Report 
generator per PFS File. Lit. 267.000. 

PFS FILEREPORT: Versione Integrata. Lit. 

505.500. 

• FIRST BASE: (Desk Top). Data Base Rela¬ 
zionale. Lit. 532.000. 

Gestione amministrativa 
e finanziaria: 

DOLLARS & SENSE: (Monogram). Analisi Costi 
e Bilanci fino a 120 conti. Lit. 376.500. 
FINANCIAL MGN: (Software Arts). Gestione e 
analisi finanziaria. Lit. 129.000. 

MULTIPLAN: (Microsoft). Completo per pianifi¬ 
care. previsioni e simulazioni. Lit. 449.000. 
ELECTRIC CHECK BOOK: (State of thè Art). 
Gestione Bilancio Familiare. Lit. 240.000. 

• THE HOME ACCOUNTANT: (Virtual Combi- 
natics). Programma per preparazione ricette cu¬ 
cina. Lit. 102.000. 


Ufficio moderno: 

MAC CALENDAR: (Videx). Gestisce appunta¬ 
menti ed appunti con dinamicità. Lit. 207.000. 
MEGAMERGE: (Megahaus). Personalizza i do¬ 
cumenti scritti con MACWrite. Lit. 279.000. 

• MICROSOFT WORD: (Microsoft). Videoscrit¬ 
tura con finestre e Mouse. Lit. 447.000. 

• P.A. DIARY: (Rodent Software). Organizza il 
tuo tempo. Lit. 225.000. 

• THINK THANK: (LivingVideotext). Il primo 
Processore delle Idee. Lit. 376.500. 

MASTER TYPE: (Scarborough). Insegna la dat¬ 
tilografia. Lit. 129.450. 

MAC DESK: (Intermatrix). Organizza la scriva¬ 
nia e appuntamenti. Lit. 447.000. 

MOM: Mac Office Manager: (Onnisoft). Foglio 
calcolo, database, grafica e word processor con 
mailmerge integrati, compatibilità file Multiplan. 
Lit. 1.485.000. 

Applicazioni professionali: 

COMMUNICATION EDGE: (Human Edge). Per 
comunicare meglio nei meetings e nelle conver¬ 
sazioni. Lit. 505.000. 

MANAGEMENT EDGE: (Human Edge). Con¬ 
trollo dell'efficienza e produttività del personale. 
Lit. 648.000. 

SALES EDGE: (Human Edge). Controllo e ge¬ 
stione clienti e prodotti. Lit. 648.000. 

HAYDEN SPELLER: (Hayden Software). Con¬ 
trollo vocaboli. Lit. 207.300. 

Calcolo tecnico e scientifico: 

COSTRUZIONE E PROGETTAZIONE EDIFICI: 

(Software Arts). Lit. 129.000. 

INGEGNERIA MECCANICA: (Software Arts). 
Lit. 129.000 

INGEGNERIA FINANZIARIA: (Software Arts). 
Lit. 129.000. 

• Tk! SOLVER: (Software Arts). Risolve sem¬ 
plici o complesse equazioni. Contiene formule 
per finanza, ingegneria e costruzioni. Lit. 
570.000. 

Applicazioni grafiche 
e tecniche: 

• DAVINCI BUILDING BLOCKS: (Hayden 
Software). Libreria grafica estesa per disegni di 
architettura. Lit. 207.300. 

• DAVINCI COMMERCIAL INTERIORS: (Hay¬ 
den Software). Libreria grafica estesa di immagi¬ 
ni per disegno di uffici modulari e interni comples¬ 
si. Lit. 518.250. 

CLICK ART : (T/Maker Graphics). Cento simboli 
e ritratti professionali da usare con il Mac. Lit. 
114.000. 

DA VINCI GRAPHICS: (Hayden Software). Pro¬ 
gettazione su Mac per architetti e designers. Lit. 
129.000. 

• MAC VISION: (Koala Tecnologies). Interfac¬ 
cia per telecamera o camera per ripresa ed ela¬ 
borazione immagini esterne. Lit. 1.050.000. 

• MICROSOFT CHART: (Microsoft). Scelta fra 


40 tipi di diagrammi e rappresentazioni grafiche. 
Lit. 297.000 

MAC THE KNIFE: (Miles Computing). Libreria di 
immagini, icone decorazioni e fondi creati con il 
MacPaint, più due nuovi tipi di caratteri. Lit. 
101 . 000 . 

MAC THE KNIFE: (Fonts). Lit. 127.000. 

ART PORTFOLIO: (Axlon Ine.). Libreria di dise¬ 
gni suddivisi in 12 categorie. Lit. 155.400. 

• SLIDE SHOW MAGICIAN: (Magnum Softwa¬ 
re). Per creare prestazioni molto professionali. 
Lit. 180.000. 

MAC PIC 1 & MAC PIC 2: (Magnum Software). 
ClipArt per Mac. Lit. 150.000 (cadauno). 
READY SET GO: (Manhattan Graphics). Sele¬ 
zione di arte grafica per la stampa di lettere, libri, 
etc. Lit. 375.000. 

MENU PATTERNS: (Finger Tip). 500 fondini da 
usare con Mac Paint. Lit. 120.000. 

IMAGES: (Matrix Advocates). Libreria di imma¬ 
gini per lettere, documenti da usare con Mac¬ 
Paint. Lit. 135.000. 

CARD SHOP: Libreria di immagini per biglietti 
d'auguri. Lit. 155.000. 

Comunicazioni: 

• DAISYWHEEL CONNECTION: (Assimilation 
Process). Consente stampa lettera qualità su 
printer margherita. Lit. 357.000. 
DATATALKER/EMUL. 3270: (WinterHalter 
Ine.). Consente il collegamento remoto del Mac 
con Mainframe Ibm serie 30XX e 43XX. Non 
ancora quotato. 

• PC AL MAC E RITORNO: (Dilithium Press). 
Ideale per scambiare informazioni in un sistema 
ufficio misto. Anche emulatore terminale. Lit. 
234.000. 

• SMOOTH TALKER: (FirstByte). Sintetizzato¬ 
re vocale per Mac. Lit. 388.650. 

• EPSTART: (Softstyle). Modifica il file Ima- 
gewriter del MAc così da stampare usando la 
Epson FX o JX. Lit. 153.000. 

Didattica: 

• MAC COACH: (Ati). Introduzione al Mac. Lit. 
189.000. 

MAC MANAGER: (Harvard Associates). Simu¬ 
lazione di mercato per il manager moderno. Lit. 
132.000. 

MILLIONAIRE: (Blue Chip Software). Simula¬ 
zione del mercato azionario. Lit. 132.000. 
MUSIC WORKS: (Hayden Software). Per com¬ 
porre e stampare le composizioni. Lit. 120.000. 
PROFESSIONAL COMPOSER: (Mark of thè 
Unicom). Comporre, redigere e stampare tutta la 
musica. Lit. 1.312.000. 

MAKE MILLIONS: Lit. 127.000. 

MACMATCH: Lit. 127.000. 

Giochi: 

MURDER BY THE DOZ: Lit. 116.550. 
LODERUNNER: Lit. 103.500. 

CHIPWITS: Lit. 127.000. 
MACGAMMONMACCRIBBAGE: Lit. 169.600. 


Importante novità per i rivenditori Southern European Computer: 


Bollettino software. 

Da oggi potete collegarvi, via modem, con la rete TINA e 
conoscere: tutte le novità software e hardware. L'elenco 
dei prodotti più venduti. Il catalogo con i prezzi aggiornati. 
Fare i vostri ordini in tempo reale. Ricevere informazioni 
tecniche. Avere e dare informazioni fra dealers sullo stoc¬ 


caggio di magazzino ed effettuare eventuali compensa¬ 
zioni. Verrà concesso uno sconto del 5% sul primo ordine 
eseguito dopo l'allacciamento alla rete. Per informazioni 
rivolgersi a Southern European Computer, Via Molino 2, 
Montorfano (CO), telefono (031)200621, Telex 340 422 
WTC SEC. 


SEBSDSDD 3ESQBQBE3 



Software 


via Molino 2. 22030. Montorfano (Como). Telefono (031) 200621. Telex 340422 WTC-I-SEC 


Con un modesto sovrapprezzo 
consegne a domicilio in 48 ore. 































casella J6, dove scriverete 1+J6. Se 
per esempio il lunedì del vostro rim¬ 
borso settimanale è il 4, basterà scrive¬ 
re 4 in D6, e automaticamente sotto 
martedì comparirà 5, e così via. 

Alla riga 24, colonna D, è il momen¬ 
to di cominciare a inserire la prima 
formula:_ 

+D9+§SUM (D15.D23) 

e così di seguito per tutta la riga, casel¬ 
la per casella, come si può facilmente 
desumere dalla figura 2. Chi usa Visi- 
Cale, al posto del segno §, deve mette¬ 
re il segno @. Fate comunque atten¬ 
zione al seguente particolare: nelle 
formule della figura 2, anziché un solo 


punto potete vedere tre punti tra DI e 
D23, voi però dovete battere un solo 
punto quando inserite le formule. 
Provvederà il computer a trasformare 
il vostro unico punto in tre punti. 

Lo stesso dicasi per le altre formule 
del modello, che non hanno bisogno di 
ulteriori descrizioni perché sono tutte 
riconducibili a quanto abbiamo già 
esaminato finora. 

Il modello permette la stesura di 
una nota spese effettuata anche in va¬ 
luta estera. Per questo, in E2 potete 
inserire il valore del cambio al mo¬ 
mento della richiesta di rimborso, per 
avere nella riga finale del prospetto il 
calcolo automatico del controvalore in 


lire italiane. Se invece utilizzate il mo¬ 
dello per compilare rimborsi spese in 
lire italiane, basterà lasciare vuota la 
casella E2. 

Infine, se la nota spese deriva, per 
esempio, dalla visita di un cliente, po¬ 
tete inserire il suo nome nella zona in 
alto a destra del prospetto, lasciata li¬ 
bera proprio per questo scopo. 

Ricordatevi di delimitare anche la 
parte destra del prospetto con una riga 
di punti esclamativi, seguendo questa 
procedura: dopo esservi posizionati in 
Al, premete mela vuota D, RE¬ 
TURN, spostate il cursore lungo tutta 
la linea di punti esclamativi, premete 
ancora RETURN, posizionate il cur- 



Figura 1. 


CLIENTE 


2 NOTA SPESE SETTIM. 

3 Carabio : 

4 

5 SIORNO 


7KM percorsi 
SCarburanti e 1 ub. 
9 Itinerario 

10 Costo km 

11 450 


15 AUTOGRILL 


21 TOTALE 0.00 252.00 293.50 359.00 84.50 

22Addebito x auto 3.00 0.00 0.00 0.00 0.00 

23 Traspor ti 

24 Trasporti 
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31 TOTALE 

32 TOTALE GENERALE 
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sore in MI e premete un’ultima volta 
RETURN. Chi usa VisiCalc prema/R 
invece di mela vuota D. 

La procedura per stampare il pro¬ 
spetto è la medesima indicata nel nu¬ 
mero 12-13 di Applicando , nell'artico¬ 


lo che descriveva la creazione di un 
Budget, sempre con AppleWorks e 
VisiCalc. In questo caso tuttavia è più 
semplice, perchè, una volta definiti i 
parametri di stampa, il rimborso spese 
può essere stampato in un unico fo¬ 


glio, anche da una stampante a 80 co¬ 
lonne. 

Infine, un utile trucco per assicurar¬ 
vi di aver inserito esattamente tutte le 
formule, è quello di premere mela¬ 
vuota Z: sullo schermo, al posto dei 


Figura 2. Ecco 
comesi presenta il 
foglio stampato usando 
l’opzione mela-vuota Z: 
al posto dei risultati 
vengono evidenziate le 
formule che portano a 
questi risultati, pernia— 
più agevole controllo di 
aver inserito in ogni 
casella il suo esatto 
contenuto. 


NOTA SPESE SETTIh. 
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VARIE 






JSIH!D20...k'20' 

asin< 02;... J2i> 
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Autostrade 






iS-Jr.(029...J29) 

Taxi 






ÌSW(D30...J30» 

Posteggi 
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TOTALE 6ENERALE *024*035 

*E24*E35 

♦F24*F35 

♦G24*G35 *H24*H35 

♦124*135 

♦J24*J35 

♦L24*L35 

Allegati o* 
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Questo libro, partendo dalle 
istruzioni in Basic, vi introduce 
al linguaggio macchina dell’Ap¬ 
ple, iniziando dagli esempi più 
semplici per arrivare in fine al¬ 
l’uso dei miniassembler. 

340 pagine, 15.000 lire. 


Gli elementi essenziali del Lisp, 
con numerosi programmi subito 
utilizzabili. 

216 pagine, 19.000 lire. 


Microsoft Basic 



Un breve manuale di introdu¬ 
zione al Microsoft Basic, una 
evoluzione e specializzazione 
del Basic originale, che è di 
fatto lo standard del Basic per 
microcomputer. 

150 pagine, 12.000 lire. 



Imparate 
il linguaggio 
dell’Apple 




Routine d’aiuto alla soluzione di 
problemi che si incontrano in 
fase di progettazione. 

138 pagine, 14.000 lire. 



Desidero acquistare 

□ . 

□ . 

□ . 



Per conoscere questa macchi¬ 
na, la sua impostazione e quali 
funzioni consente di assolvere. 
152 pagine, 16.000 lire. 


Pagherò al postino il prezzo indicato + 1.000 lire per contributo spese postali 
□ Desidero solo ricevere il vostro catalogo generale 
Ritagliate e spedite a: 

gruppo editoriale muzzio - via makallè 73 - 35138 padova 


nome.cognome 

via. 

c.a.p.città. 














































































risultati, saranno visibili tutte le for¬ 
mule che portano a quei risultati. 

State attenti però ad allargare le co¬ 
lonne, perchè, essendo le formule più 
lunghe di un semplice risultato nume¬ 
rico, occupano più spazio e quindi la 
loro visualizzazione viene troncata. 
Per allargare le colonne, fate riferi¬ 
mento a quanto spiegato in proposito 
nella parte iniziale di qesto stesso arti¬ 
colo, con l’avvertenza, dopo aver evi¬ 
denziato l’opzione DIMENSIONE 
COLONNE, RETURN, di premere 
freccia destra per evidenziare insieme 
tutte le colonne che volete allargare. 
Poi battete RETURN e mela-vuota 
freccia-destra per allargare tutte le co¬ 
lonne finché siete sicuri che le formule 
vengano visualzzate per intero. A que¬ 
sto punto potete anche stampare il 
prospetto al fine di un più agevole con¬ 
trollo di tutte le formule inserite. Per 
far tornare a video i risultati, anziché 
le formule, basta che premiate mela¬ 
vuota Z. 

Chi usa VisiCalc segua invece la se¬ 
guente procedura. Batta /SS, poi SI, 
se avete la stampante collegata con lo 
slot n. 1; S2, se invece è collegata con 
lo Slot n.2, ecc. Infine RETURN. Sul¬ 
la stampante verranno stampate tutte 
le caselle del vostro Spreadsheet, in 
colonna, con tutte le formule. 


► 


Corso AppleWorks/VisiCalc 
anche su dischetto 


◄ 


Continua con questo numero 
il corso pratico di utilizzo del 
programma Appleworks. Il 
corso prevede cinque modelli di 
spreadsheet, tre di data base e 
due di word processor. Alla fi¬ 
ne, chi seguirà il corso sarà in 
grado di utilizzare pienamente 
questo splendido programma 
disponibile in italiano presso 
tutti i computershop. 

Coloro che fossero interessa¬ 
ti solo allo spreadsheet, perché 
in possesso di VisiCalc, trove¬ 
ranno ugualmente interesse a 
seguirlo, in quanto tutti i co¬ 
mandi che servono a costruire i 
modelli di calcolo elettronico 
verranno forniti sia per Apple¬ 
works, sia per VisiCalc. 

Alla rubrica Disk Service tro¬ 
verete il tagliando per ordinare 
i modelli, che di numero in nu¬ 
mero vengono presentati, regi¬ 
strati su dischetto. Abbiamo 


contenuto il loro costo pratica- 
mente al valore del disco vergi¬ 
ne (15.000 lire), se considerate 
le spese postali (il disco viene 
inviato raccomandato), per da¬ 
re a tutti la possibilità di con¬ 
frontare il modello costruito da 
sé con quello effettivamente 
creato dagli esperti di Appli¬ 
cando. E anche per avvantag¬ 
giare coloro che non hanno 
tempo di seguire questo utilissi¬ 
mo corso, ma che desiderano 
ugualmente servirsi dei modelli 
in casa o sul lavoro. 

Coloro invece che desidera¬ 
no solo due dischi, con 5+5 mo¬ 
delli, da utilizzare subito, pos¬ 
sono ordinarli a 80.000 lire. 

E’ disponibile anche il disco 
dati per VisiCalc, con i cinque 
modelli, al prezzo di 40.000 li¬ 
re, oppure i singoli modelli, re¬ 
gistrati su dischetto, sempre al 
costo di 15.000 lire cadauno. 
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A. casa tua, partendo dalle nozioni 
di base e mettendo ogni volta in pratica 
ciò che impari, diventerai un esperto in 
micro-calcolatori 

Non solo, ma con i materiali del Corso 
costruirai interessanti apparecchiatun: 
che resteranno di tua proprietà e 
ti serviranno sempre: il MINILAB 
(laboratorio di elettronica 
sperimentale), il TESTER (analizzatore 
universale), il DIGILAB (laboratorio 
digitale da tavolo), l’EPROM 
PROGRAMMER (programmatore di 
memorie EPROM) e l’ELETTRA COMPUTER 
SYSTEM (microcalcolatore basato sullo Z80). 
Chiedi oggi stesso informazioni gratis e senza 
impegno su questo 
nuovo Corso o 
sugli altri 9 Corsi 
di elettronica 
preparati per 
te da Scuola 
Radio 
Elettra. 


I microcomputer richiedono tecnici capaci di 
assicurarne sempre il perfetto funzionamento. Sapere 
com’è fatto un microcomputer, conoscerne tutti i segreti, 
è il punto di partenza per un’attività moderna, specialistica 
e interessante anche per le possibilità di guadagno. 

Ecco perché Scuola Radio Elettra 
ti propone il CORSO-NOVITÀ 

ELETTRONICA DIGITALE 
E MICROCOMPUTER 

in 44 gruppi di lezioni e 17 serie 
" di materiali con oltre 870 
componenti e accessori. 

Compila e spedisci questo tagliando. 




Scuola Radio Elettra 

Via Stellone 5-10126 Torino 


X 96 


Compila, ritaglia, e spedisci solo per informazioni a: 

SCUOLA RADIO ELETTRA - Via Stellone 5 -10126 Torino 

Vi prego di farmi avere, gratis e senza impegno, il materiale informativo relativo al Corso di: 


□ Tecnica elettronica 
sperimentale (NOVITÀ') 

□ Elettronica digitale (NOVITÀ') 

□ Microcomputer (NOVITÀ’) 

□ Elettronica Radio TV 

□ Elettronica industriale 


□ Televisione b/n 

□ Televisione a colorì 

□ Amplificazione stereo 
OAIta fedeltà 

□ Strumenti di misura 


(Indicare con una crocetta la casella che interessa) 




























Grafici a colonna, grafici a torta, grafici a linee... Con questo 
"^£ 0 ^ programma, facilissimo da usare perché tutto in punta di mouse, 

è possibile tradurre aride sequenze di numeri 
in affascinanti immagini che... 


Microsoft Chart 


Wcili 


on questo programma diventti fa'i \ 


f diissimo preparare grafia d’ogni. 
genere in pochi minuti. Acceso il com¬ 
puter e inserito il dischetto, per prima 
cosa bisogna scegliere il modo inseri¬ 
mento dati facendo clic sulla finestra 
DATA. Quattro sono le possibilità: in 
ordinata si inseriscono sempre dati, 
mentre l’ascissa può servire per evi¬ 
denziare l’anno di partenza che a prio¬ 
ri si può decidere di incrementare di 
uno, due, tre, e così via, automatica- 
mente, in modo che rinserimento si 
limiti poi ai dati in ordinata. Oppure, 
sempre in ascissa, si può evidenziare 
una data di partenza (mese, giorno, 
anno) e incrementarla o di anno in 
anno, o di mese in mese, o di giorno in 
giorno, o di settimana in settimana. 
Oppure si può scrivere una definizione 
per ogni dato che si vuole inserire. 
Quarta e ultima possibilità, si può dare 
un ordine numerico ai dati da inserire. 

Per esempio (figura 1), scegliamo la 
prima possibilità. Dopo aver inserito i 
dati, facendo clic nell’opzione GAL¬ 
LERY, possiamo scegliere il tipo di 


grafico che ci interessa fra AREA, 
BAR, COLUMN, LINE, PIE, 
SCATTER, COMBINATION (figu¬ 
re da 2 a 8). All’interno di ogni opzio¬ 


ne, è possibile scegliere fra diversi tipi 
di grafico della stessa specie. Sceglia¬ 
mo COLUMN e facciamo clic su 
PLOT SERIES: il risultato è mostrato 
nella figura 9. 



Figura 1 
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Figura 2 


Raffronti 

A questo punto può essere interes¬ 
sante raffrontare due serie di dati rap¬ 
portati allo stesso periodo. Per esem¬ 
pio il primo può essere vendite e il 
secondo acquisti. Facciamo clic sul ri¬ 
quadro in basso a destra della figura 9, 
NEW SERIES, e inseriamo la nuova 
serie di dati relativi agli acquisti. Fac¬ 
ciamo poi clic su PLOT SERIES, clic 
sul grafico, clic su FILE scegliendo 
NEW FORMAT, clic su GALLERY 
scegliendo COLUMN e il tipo 1 di 
grafico a colonna (figura 4). A questo 
punto Io schermo è quello di figura 10, 
con i dati delle due tabelle affiancati 
per un rapido raffronto. 

Con estrema semplicità è possibile 
poi scrivere all’interno del grafico 
quello che si vuole per chiarirne me¬ 
glio concetti e contenuti (figura 11). 
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IREmOR Informatica srl 

y. Togliatti 4 56030 Perigliano Pi 

Rivenditore e centro assistenza 
AUTORIZZATO 

[cippkz computer 

. . fin dal 1980 


HRRDURRE : con garanzia 
Rpple.. Tutta la gamma . 
..a prezzi super-scontati, 
periferiche e accessori.. 
un grande assortimento 
...ai prezz i p i u ’ bass i. 
Supervalutazione dell ‘usato 

SQFTIIRRE : con aggiornamenti 
SHC - Gestione servizi 


per comuni medio-piccoli, tributi, 
anagrafe,stato civile elettorale. 

SPQ - Gestione Rziende 
ordini/ pr oduz / magazz /fatturoz. / 
pagamenti /statistiche /budget /iva 
contabilita* generale e forfettaria. 

SDS - Gest. studi commerc. 


simulazione /pianificazione /analisi 
statistiche /grafica /archiviazione. 

gestione/or chiviaz. e stampa della 
modulistica fiscale ricorrente. 

551- Gest. studi tecnici 
oltre 70 pakage per archiviare, 
progettare, colcolore, disegnare. 

55P - Didattica e Insegn. 


oltre 20 pakage a libro elettronico 
SDC - Hobby Casa Giochi 


oltre 100 dischi per animazione, 
outoapprendimento, grafica, quiz, 
sintetizzazione vocale, avventure. 


Condizioni particolari 

sono previste per gli operatori 
commerciali del settore 


Richiedere specifiche e prezzi per 
il settore interessato inviando lit. 
3.000 in francobolli o passandoci 
una ordinazione anche telefonica. 


Per dettagli tecnici urgenti : 
TELEFONARE allo 0587-616084 


MATERIALI FORNITI CON 
GARANZIA 

SODDISFATTI 0 RIMBORSATI 
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RIVENDITORE AUTORIZZATO 

Qgcippkz computer ine. 



Software 

Contabilità generale 80CL Prodos 
Contabilità semplificata 
multiaziendale 
Gestione Parrocchie 
Gestione Alberghi 
Parcellazione studi legali 
Fatturazione su MAC 

Hardware 

Interfacce per Olivetti 
ET 121 /201 /221 / 111 
Interfacce per Adler 
G 8008 SE 71005/ 1010/ 1030 



INFORMATICA 

BIELLA 

VIA ROMA 11 
13051 BIELLA 
TEL. 015 - 29.875 
24.181 


Grafici a torta 

Per quanto riguarda i grafici a torta, 
esistono alcune possibilità che vale la 
pena segnalare. Chiamiamo un nuovo 
file e inseriamo i dati di fatturato per 


Figura 6 I é FiTe EdTt Data 


trimestre relativi all’anno 1984. Fa¬ 
cendo clic su GALLERY scegliamo 
PIE e l’opzione 6 (figura 6). Automa¬ 
ticamente i dati vengono suddivisi in 
un grafico a torta che riporta in per¬ 
centuale sul totale del fatturato i sin¬ 
goli fatturati trimestrali. Se poi voglia- 



Figura 9 
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mo avere queste percentuali in ordine 
numerico crescente basta fare clic su 
DATA e scegliere l’opzione SORT 
(figura 12). Facciamo quindi clic su 
CHART e attiviamo l’opzione ADD 
LEGEND. Con un clic sulla zona che 
riguarda il fatturato del terzo trimestre 


selezioniamo appunto quella zona e 
per mezzo del mouse possiamo spo¬ 
starla in fuori per una migliore eviden¬ 
ziazione: il risultato è visibile nella fi¬ 
gura 13. 

Si tratta quindi di un programma 


davvero facile da usare, ma estrema- 
mente duttile. Prodotto dalla Micro¬ 
soft, è distribuito in Italia, in versione 
originale, da Southern European 
Computer, Via Molino 12, Montorfa- 
no (CO), telefono 031—200621. Costa 
297. 000 lire Iva compresa. 
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Una scuola che non funziona, 

ore e ore di televisione, 

poco tempo per seguirli nello studio. 

E adesso il personal computer. 

È l’ennesimo nemico dei nostri figli? 

O può invece aiutarli 
a imparare di più, a sviluppare meglio 
le loro facoltà? Ecco tre 
programmi che la dicono molto lunga. 



Imparalo 


col computer 


S i sa che i bambini di oggi non sono 
quasi più capaci di parlare: si 
esprimono per grugniti e per slogan, 
sposando suoni onomatopeici rubati ai 
fumetti con gestacci futuristi appresi 
dagli spot televisivi o dai videogame. 
Quando scrivono, poi, apriti cielo. Le 
ultime generazioni di genitori, infatti, 
sono sempre più allarmate e, recitan¬ 
do il mea culpa per aver tollerato la 
perniciosa simbiosi tra figlio e TV, giu¬ 
rano che però dal personal computer, 
almeno da quello, lo salveranno. 

Hanno torto o ragione? Come sem¬ 
pre, dipende. Utilizzare lo schermo di 
un PC per giochi interminabili e ripeti¬ 
tivi, che richiedono alla mente un'agi¬ 
lità di tipo scimmiesco, serve solo ad 
atrofizzare alcune preziose potenziali¬ 
tà delFintelligenza infantile; educare 
solo al rapporto con il mondo delle 
immagini trascurando quello delle pa¬ 
role non produce certamente dei lette¬ 
rati; impigrire la memoria del bambi¬ 
no insegnandogli a utilizzare ogni vol¬ 
ta che è possibile quella dell’elabora¬ 
tore, infine, tutto fa fuorché il suo be¬ 
ne. 

Vietarlo ai minori non è comunque 
la soluzione: come ogni strumento, 
anzi più degli altri strumenti perché 
sconfinatamente ottuso ed efficiente. 


il personal computer fa quello che gli si 
fa fare, e nulla più. Istruito con i giusti 
programmi, diventa anzi un ottimo pe¬ 
dagogo, e come tale sfoggia alcune vir¬ 
tù che agli umani spesso fanno difetto: 
la sua pazienza non ha limiti, ma è 
inflessibile; giudica con imparzialità i 
risultati; sa premiare quelli positivi; 
non ha fretta, non si distrae, non si 
ammala... 

Per quali bambini? 

Tre programmi, tre fasce di età: per 
quella prescolare un quiz che insegna a 
contare, attribuendo un numero a un 


insieme di figure colorate; per quella 
della prima scolarità un metodo non 
uggioso per apprendere l’ortografia; 
per quella immediatamente successiva 
un vivace e divertente gioco in cui vin¬ 
ce chi sa meglio le tabelline... 

Elaborati da tre studiosi americani 
di psicopedagogia infantile, hanno tut¬ 
ti in comune alcune fondamentali ca¬ 
ratteristiche: obbediscono a principi 
educativi avanzati (non richiedono al 
bambino, per esempio, risposte mec¬ 
caniche, ma stimolano la sua parteci¬ 
pazione); sono già stati sperimentati 
con successo; allegri e colorati, otten¬ 
gono un’ottima accoglienza da parte 
dei giovanissimi fruitori. 

Quiz di 
conteggio. Le 
10 figure tra 
lequali il 
computer 
sceglie, in 
modo 
casuale, 
quella da 
presentare a 
video, 
ripetendola 
fino a nove 
volte. 
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Quiz di conteggio 

Con questo programma si può inse¬ 
gnare al bambino in età prescolare il 
valore dei primi numeri, utilizzando 
figure in grafica ad alta risoluzione; 
l’attenzione del bambino e il suo coin¬ 
volgimento sono assicurati da un at¬ 
tento e ricco dosaggio di suoni e luci, il 
cui avvicendarsi funge da ricompensa- 
motivazione. 

L’Apple sceglie una figura a caso in 
una tavola che ne contiene dieci e poi 
la disegna con DRAW ripetendola 
sullo schermo per un numero casuale 
di volte (da 1 a 9), a colori pure casua¬ 
li, sullo schermo Hi—Res. Quindi il 
programma chiede al bambino di pre¬ 
mere il tasto corrispondente al nume¬ 
ro delle figure disegnate. 

La risposta giusta viene premiata 
con un display, scelto a caso tra i cin¬ 
que disponibili, che riempie lo scher¬ 
mo di disegni colorati. Vengono con¬ 
cesse ogni volta due occasioni, dopo di 
che si passa a un nuovo numero: lo 
schermo viene pulito e vengono dise¬ 
gnate nuovamente le figure. 

A causa della sua struttura, il quiz di 
conteggio è probabilmente più piace¬ 
vole quando è visto a colori. Si è co¬ 
munque sperimentato che riesce sen¬ 
z’altro a divertire anche in bianco e 
nero. 

L’istruttore 
di ortografia 

Il programma sceglie a caso e pre¬ 
senta sullo schermo una parola, sce¬ 
gliendola da un elenco di parole me¬ 
morizzate in precedenza. Il ragazzo, 
imparata la parola, può batterla sulla 
tastiera del computer, ossia copiarla. 
Se però la parola viene digitata in mo¬ 
do inesatto, ogni errore, sullo scher¬ 
mo, viene segnalato da un trattino; se, 
per esempio, il ragazzo scrive ELA- 
FANTE, la parola appare sullo scher¬ 
mo come EL—FANTE. 

A questo punto il computer chiede 
che la parola venga scritta nel modo 
giusto, e insiste fino a ottenere la gra¬ 
fia esatta. Una volta scritta in modo 
corretto, la parola viene presentata di 
nuovo, ma questa volta con una delle 
sue lettere, scelta a caso, sostituita da 
uno spazio vuoto. Spetta al ragazzo, 
naturalmente, completarla battendo 
la lettera mancante. Il procedimento 
continua con la rimozione di una lette¬ 
ra dopo l’altra e, infine, viene presen¬ 
tato solo uno schermo vuoto. 

E questo il momento in cui il ragaz¬ 
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L’istruttore di ortografia. Con questo programma, i bambini delle prime classi 
elementari possono sicuramente migliorare la loro ortografia. 


zo deve scrivere l’intera parola a me¬ 
moria. Se sbaglia, il paziente compu¬ 
ter gli presenta nuovamente il vocabo¬ 
lo esatto e ripete l’intero procedimen¬ 
to. Al termine di una lezione di dieci 
parole viene visualizzato il numero de¬ 
gli errori. 

Il grande pregio di questo program¬ 
ma è che evita l’acquisizione di infor¬ 
mazioni inesatte, e utilizza come prin¬ 
cipi di apprendimento il suggerimen¬ 
to, il rafforzamento e il coinvolgimen¬ 
to. 

Suggerimento. Al ragazzo vengono 
fornite delle indicazioni (le lettere), 
che gli vengono poi gradualmente sot¬ 
tratte. (La maggior parte di noi ha fat¬ 
to ricorso a qualche sistema di indica¬ 
zione per ricordare la materia che gli 
serviva per un esame o per un discor¬ 
so. Questo principio, del resto, gover¬ 
na trucchi mnemonici famosissimi del 
tipo "come quando fuori piove", per 
ricordare i semi delle carte.) Ognuna 
delle lettere serve dunque come indi¬ 
cazione. A mano a mano che queste 
indicazioni vengono rimosse, una alla 
volta, e la parola è ancora ricordata 
nella grafia giusta, esse tendono a di¬ 
ventare sempre meno necessarie e fi¬ 
niscono per non esserlo affatto. 

II rafforzamento. Il ragazzo viene im¬ 
mediatamente informato se la risposta 
è giusta o sbagliata: i dati emersi dalle 
ricerche compiute avallano chiara¬ 
mente il valore dell’immediato ap¬ 
prendimento dei risultati. 

Il coinvolgimento. L’allievo partecipa 
attivamente, non recepisce passiva¬ 
mente. Il programma non si limita a 
scorrere mentre la persona "legge" o 
"dorme": lo studente deve reagire con¬ 
tinuamente perché il programma con¬ 
tinui. 


Math Monster 

È un gioco di addestramento mate¬ 
matico che permette di impratichirsi 
nelle basi della moltiplicazione e della 
divisione. Dato il via al programma, 
appare sullo schermo un’immagine in¬ 
grandita del mostro e vengono date al 
giocatore tre opzioni: istruzioni, mol¬ 
tiplicazione o divisione. Quando si so¬ 
no lette le istruzioni, e si è deciso se 
esercitarsi nella moltiplicazione o nel¬ 
la divisione, ha inizio il gioco. 

I math monster sono esseri cattivis¬ 
simi che si nutrono di scadenti mate¬ 
matici, e vengono invece debellati da 
matematici provetti. Ogni partita met¬ 
te in azione fino a cento mostri e solo 
tre matematici, le cui doti scientifiche 
sono né più né meno quelle del ragaz¬ 
zo. Sullo schermo si vede un math 
monster che insegue un matematico; 
le loro posizioni relative mutano in ba¬ 
se alla soluzione data a un piccolo que¬ 
sito del tipo "8 per 9". Se la risposta 
data è 72 il matematico guadagna ter¬ 
reno, avvicinandosi a uno scintillante 
martello con il quale potrà sconfiggere 
il nemico. Se la risposta non è 72 (o 
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Math Monstcr. Il mostro, simpatico ed esperto in matematica, propone una serie di 
domande mentre insegue il bambino (illustrazione in alto); se le risposte sono 
giuste, il bambino riesce a raggiungere il cartello situato a una certa distanza e a 
darlo in testa al mostro (illustrazione al centro); se invece le risposte sono inesatte, 
il mostro raggiunge il bambino (illustrazione in basso). 


non è in assoluto), il mostro si avvicina 
un po’ all’inseguito e, per un breve 
periodo, viene mostrata la risposta 
esatta in modo che il giocatore la possa 
esaminare. 

Se il mostro raggiunge la figura in 
corsa questa scompare, l’altoparlante 
dice "UH—OH!" e sullo schermo com¬ 
pare la parola "BURP". Poi viene data 
la soluzione esatta del problema mate¬ 
matico, le figure riprendono la posi¬ 
zione originaria (l’inseguito è il nume¬ 
ro due: dopo di lui ce n’è solo un altro 
a disposizione del giocatore) e viene 
presentata una nuova operazione. 

Se il giocatore riesce a rispondere in 
modo esatto a sette problemi, la figura 
in corsa raggiunge il martello; a questo 
punto comincia il divertimento. Dopo 
aver afferrato il martello, la figura in 
corsa si volta e torna correndo verso il 
mostro, agitando felice la sua arma: 


tre colpi decisi sulla zucca sono suffi¬ 
cienti a placare qualsiasi mostro. Nel¬ 
l’angolo in alto a sinistra dello scher¬ 
mo compare un mostro supino, da po¬ 
co defunto. 

A mano a mano che ciascun mostro 
viene eliminato, ne compare un altro e 


il gioco continua. Un buon giocatore 
ben presto accumula nell’angolo in al¬ 
to a sinistra un intero mucchio di mo¬ 
stri morti. Quando viene colpito il de¬ 
cimo mostro, tutti i mostri morti scom¬ 
paiono, lasciando il posto, sotto l’area 
di gioco, a una piccola pietra tombale 
con la scritta "10"; intanto l’altoparlan¬ 
te dell’Apple suona un breve inno fu¬ 
nebre. 

E così via, fino a quando il giocatore 
perde i suoi tre corridori o sconfigge 10 
mostri. Poi gli viene chiesto se vuole 
giocare ancora. 

In questo programma, tutti i proble¬ 
mi di moltiplicazione hanno risposte di 
due cifre, mentre tutti i problemi di 
divisione hanno risposte di un’unica 
cifra. Quando è stata introdotta la pri¬ 
ma cifra di una risposta a un program¬ 
ma di moltiplicazione, il programma 
non fa nulla mentre attende che venga 
introdotta la seconda cifra. Perciò il 
giocatore può impiegare tutto il tempo 
necessario per introdurre questa se¬ 
conda cifra. Purtroppo se viene intro¬ 
dotta una prima cifra sbagliata non c’è 
alcun modo di correggerla. Il pro¬ 
gramma poteva essere scritto in modo 
da permettere la correzione, ma in tal 
caso il giocatore potrebbe deliberata- 
mente intodurre una prima cifra qual¬ 
siasi per fermare il mostro, impiegare 
tutto il tempo necessario per determi¬ 
nare la risposta giusta al problema e 
poi correggere la prima cifra e intro¬ 
durre l’intera risposta giusta. E, si sa, 
fidarsi è bene... 

La caratteristica pedagogica impor¬ 
tante della struttura del gioco è die la 
ricompensa più grande viene sempre 
per la riuscita e non per l’insuccesso. 
Ai bambini piace molto osservare il 
corridore che si volta e colpisce il mo¬ 
stro. È divertente anche vedere i mo¬ 
stri e le pietre tombali che si accumula¬ 
no e sentire la piccola melodia funebre 
ogni dieci mostri abbattuti. Al con¬ 
fronto è una cosa molto fiacca vedere 
il proprio corridore che scompare e 
sentire il "BURP" del mostro. 


Per evidenti ragioni di spazio, Applicando non pubblica i listati di questi 
tre programmi, ma offre il dischetto a tutti coloro che hanno figli (o nipotini) 
in età adatta per avere un primo approccio con il personal computer, un 
approccio però ''intelligente", che quindi sia occasione di divertimento, ma 
anche di apprendimento; utilizzando questi programmi, infatti, il bambino 
non solo approfondisce quelle nozioni fondamentali che la scuola gli inse¬ 
gna, e che alla sua età sono spesso ostiche, ma si rende anche conto che il 
computer non serve solo a giocare, ma è un utile strumento che, utilizzato 
nel modo giusto, può aiutarlo nella vita. O meglio, un simile insegnamento 
sarete voi a darlo, con l’aiuto di questi semplici ma ben studiati programmi. Il 
costo del dischetto, comprensivo di spese di spedizione, è molto contenuto 
(20. 000 lire) e le istruzioni per il funzionamento dei programmi sono regi¬ 
strate nel dischetto stesso. Per ordinarlo, utilizzate il buono del Disk Servi¬ 
ce, alle pagine 80 e 81. 
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Teo Rusconi ha appena 
sfatato la leggenda 
secondo la quale i floppy disc 
sono tutti uguali 


Difatti sembrano tutti uguali finche non 
si osserva con attenzione il jacket. Qui 
termina l’uguaglianza. 

La maggior parte delle società costruttrici 
sigillano i dischi un punto qui, un punto là, 
lasciando parte dei lembi non sigillati. 

Prima o poi ai lembi accadono cose 
naturalissime: si gonfiano, si curvano, si 
raggrinziscono... in poche parole si aprono. 


GLI ALTRI DISCHETTI 

chiusi un punto qui. 
un punto là lasciano 
gran parte dei 
lembi aperti. 


DISCHETTI MEMOREX 

con lembi completamente 
saldati su tutta 
la superficie. 


Con penne, matite, unghie persino un 
ragazzino di quattro anni come Teo può 
infilarsi in quegli spazi aperti. 

Naturalmente è un danno enorme perchè 
se si inserisce qualcosa di molle e slabbrato 
nel disc-drive quest’ultimo può incepparsi; 
si può rovinare la testina e si possono 
perdere i dati. Questo può accadere con gli 
abituali sistemi di chiusura ma non con i 
dischetti Memorex che usa un 
procedimento esclusivo chiamato 
“Solid-Seam Bonding”. 

Con questo sistema ogni singolo 
millimetro quadrato dei lembi di tutti i 
dischi Memorex viene sigillato 
ermeticamente, rendendoli più rigidi e più 
resistenti. 


È un sistema che consente al floppy disc 
di sostenere ogni assalto, che impedisce alla 
testina di rovinarsi e ai dati di andare perduti. 

Il che sta a dimostrare che un floppy disc 
Memorex non è uguale a tutti gli altri: è 
migliore. E il sistema di saldatura è solo un 
esempio della cura infinita con cui viene 
prodotto ogni floppy disc Memorex; sia 
esso da 8”, da 5 1/4” o il nuovo 3 1/2”. 
Questa estrema accuratezza dà la garanzia 
che ogni disco Memorex è al 100% perfetto. 

La prossima volta che acquistate un 
floppy disc - o qualche centinaio 
- ricordate: non tutti i dischetti 
sono uguali... 

Memorex vi mette al 
riparo da qualsiasi 
inconveniente. 


BURROUGHS-MEMOREX S.P.A. 
Divisione Computer Media 
Via Ciro Menotti, 14 Tel. 02/718551 
20129 MILANO MI 


è importante scegli 



A Burroughs Company 




















qpfpffiscuola 


a cura del professor Enzo Tonti 


estima delle colture 
arboree da frutto 



Tra gli argomenti di matematica 
finanziaria che i professori della 
scuola italiana di estimo hanno 
elaborato sul finire del secolo 
scorso, la stima dei frutteti 
riveste una particolare importanza 
didattica perché la sua struttura 
complessa e variamente 
articolata si presta 
all’applicazione di quasi tutte le 
formule di matematica finanziaria 
e permette all’insegnante 
di ribadire molti concetti 
fondamentali dell’estimo. 


3) il valore del soprassuolo, cioè il 
valore della sola coltura in atto: 
VS. 

Esempio pratico 

Consideriamo, a titolo di esempio, 
un frutteto coetaneo del ciclo econo¬ 
mico di 28 anni; immaginiamo che le 
produzioni annue siano le seguenti: 


dall’anno 1 all’anno 3 
nessuna produzione; 


dall’anno 1 all’anno 4 
lire 1.200.000; 


dall’anno 5 all’anno 10 
lire 2.500.000; 


importanza che la stima dei 
frutteti assume nell’ambito 
scolastico è messa in risalto, fra l’altro, 
dai temi ministeriali assegnati agli esa¬ 
mi di maturità per geometri e per peri¬ 
ti agrari: infatti su dodici temi di esti¬ 
mo assegnati dal 1970 al 1983, ben sei 
supponevano la conoscenza della sti¬ 
ma dei frutteti. 

Il programma proposto in questo ar¬ 
ticolo svolge il nucleo centrale dell’ar¬ 
gomento esposto nel titolo, proponen¬ 
dosi di calcolare: 

1) il valore del terreno nudo; 

2) il valore del fondo allo stato in cui si 
trova in un anno intermedio del ciclo, 
cioè il valore complessivo del terreno e 
della coltura in atto: VM (utilizzando 
le tre formule classiche) ; 


► DOS 3.3 

► ProDOS 

► APPLE 7/e 

► APPLE //c 
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dall’anno 11 all’anno 24 
lire 3.200.000; 


dall’anno 25 all’anno 28 
lire 2.600.000. 


Dall’abbattimento delle piante, a fi¬ 
ne ciclo, si ricaveranno 800.000 lire al 
netto delle spese. 

Le spese d’impianto invece siano: 
lire 6.000.000 iniziali, ciò significa al 
primo anno anticipate 
lire 2.000.000 posticipate al secondo e 
al terzo anno. 

Le spese di coltivazione, media¬ 
mente anticipate sono: 


dall’anno 4 all’anno 10 
lire 1.100.000 annue; 


dall’anno 11 all’anno 24 
lire 1.600.000 annue; 


dall’anno 25 all’anno 28 
lire 1.300.000 annue. 


Le spese per Io spianto sono nulle. 


Soluzione 

Il listato presenta una struttura se¬ 
quenziale, con un numero limitato di 
sottoprogrammi; gli argomenti sono 
ordinati in blocchi compatti e facil¬ 
mente localizzabili. Inoltre i REM che 
accompagnano le istruzioni nel corso 
del programma sono sufficienti a gui¬ 
dare chi volesse seguire il procedere 
logico delle routine, senza bisogno di 
altre spiegazioni. 

Seguendo l’esempio vediamo come 
procedere nella soluzione del proble¬ 
ma precedente. Lanciamo il program¬ 
ma e inseriamo i dati man mano che 
vengono richiesti: 


1) lunghezza del ciclo: N = (28) 


2) per l’inserimento degli importi, un 
particolare menù ci permette di sce¬ 
gliere l’opportuna unità di misura (per 
esempio, milioni di lire <RE- 
TURN>) 


3) i prodotti vanno inseriti secondo la 
sequenza: 


A=3 P=0 

A=4 P=1.2 

A=10 P=2.5 
A=24 P=3.2 
A=28 P=2.6 


L’inserimento dei prodotti è reso 
evidente mediante un grafico provvi¬ 
sorio che si forma man mano: subito 
dopo, il programma presenta il grafico 


definitivo dei prodotti. 

Il grafico provvisorio, appunto per¬ 
ché tale, funziona in maniera accetta¬ 
bile quando si inseriscono valori vero- 


LISTATO 


10 !F PEEK (103) = 1 AND PEEX t104) = 44 AND PEEK (14384 
) = 0 THEN SS 

20 POKE 103,1: POKE 104,44! POKE 14384,0: PRINT CHR$ (4);" 

RUN FRUTTETI' 

30 REM 

so rem mfAmmmmm 

34 REM 

SS REM STIMA DEI FRUTTETI 
92 REM 

96 REM 4iiì44ì4ii4iiiiii4tó 

98 REM, 

99 REM PROF, F, SC0PEL 

100 REM 

200 GOTO 3000: REM INIZIO 

221 REM - 

222 REM ESEGUI I CALCOLI 

223 REM-- 

225 TEXT : HOME : HTAB 11: VTAB 10: PRINT 'ESEGUO I CALCOLI 

r 

230 SS = 0:SR = 0:SP = 0 

240 FOR I = L TO K: REM 'L' E 5 K" SONO DEFINITI OGNI V0L 
TA PRIMA DI CHIAMARE LA SUBR0UT1NE 
250 X<!) = PO) * <0 * R) ‘ (K - I)): SEM SOMMATORIA DELLE 
PRODUZIONI: PO) 

240 YO) = SO) * (O t R) ‘ <K - !)): REM SCULTORIA DELL 
E SPESE :Sd) 

2S0 SS = SS ♦ YO): REM SOfttt ! VALORI DI 240 
285 S° = SF * X(I)i REM SOftlA I VALORI DI 250 
290 NEXT I 

295 SR = SP - SS: REM CALCOLA IL REDDITO PERIODICO 
294 HOME : RETURN 

300 REM - 

310 REM CONTROLLO DEI DATI 
320 REM --- 

325 HOME : REM I DATI ASSEGNATI COMPARIRANNO IN GRUPPI DI 

20 

32? VTAB 3: PRINT TA8( Dj'fWIQ TAB( 8):'PRODOTTI'; TABI 
24);'SPESE ': PRINT ' 1 

330 1F «t - L < = 19 THEN FOR I = L TO K: PRINT TABI 1);I 
: TABI 8);P(!); TAB( 24);S<I): NEXT : GOTO 395 
340 FOR I = L T0 L + 19: PRINT TAB( 1);!; TAB( 8):PO); TABI 
24):SO): NEXT 
345 GEL ZI 

350 IF K - L < = 40 THEN FOR I = L + 20 T0 K: PRINT TAB( 

Dii: TAB( 8);PO): TABI 24?:SO): NEXT : GOTO 395 
340 FOR ! = l* 20 T0 L ) 40: PRINT TAB( 1) ;l ; TAB( 8);P(I 
): TABE 24)jSO): NEXT 
34 c , SET Zi 

370 ìfYc * 40 THEN FOR I = L * 41 T0 K: PRINT TA8( 1); 

2: TAB( B.i;PO): TAB( 24):SdJ: NEXT : GOTO 395 
380 FOR I = L + 41 T0 L i 40: PRINT TABI 1):1: TABI 8);PO 
): TAB< 24);SU): NEXT 
385 GcT Zi 

390 FOR I = L + 4! T0 K: PRINT TABI Dii: TAB( 8);F<I>! TAB( 

24);SO): NEXT 

395 HTAB 30: VTAB 24: PRINT ' (RETURN) 1 : GET Zi: HOME : RETURN 

400 REM - 

410 SEM COMPONI IL GRAFICO 
420 REM - 

425 HGR : HC0LQR= 3:Z = 0: REM RISERVA FINESTRA PER INSERÌ 
MENTO VALORI 

430 IF BA = 3 THEN Z = (L - 1) * Q: REM VEDI REDDITI FUTU 
RI,144! 

435 HPL0T 0,75 T0 N * fi,75: REM TRACCIA UNA LINEA 

440 FOR : = 0 TO N * 8 STEP Q: HPL0T 1,77 T0 1,73: NEXT : REM. 

INDICA GLI INTERVALLI DEGLI ANN! 

445 FOR I = L TO' K: REM VEDI 240 

452 FO) = 75 * <1 - PO) / PM): REM DIMENSIONA L'ORDINATA 
POSITIVA 

440 HPL0T 2,75 T0 2 ♦ 0,75 T0 Z ♦ Q,F<I) T0 Z,Fd) T0 2,75: 

REM DISEGNA UN PETTEGOLINO 
470 2 = 2 * 8: REM DISEGNA IL R.ETTANBOLIN0 SUCCESSIVO 
475 NEXT I: REM IL GRAFICO DEI PRODOTTI E' COMPLETATO 

Continua 


ricavi per lo spianto: 0. 
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scuola 


500 HC0L0R= 3:Z = 0; REM PER LE NOTE VEDI IL GRAFICO DELLE 

9!1 D = D * BM: REM VEDI 700 

PRODUZIONI 

915 P(N) = P(N) ♦ D:P(N2) = P(N2) ♦ D: REM AGGIUNGI LO S 

504 IP BD = 0 THEN RETURN : REM SERVE SOLO DURANTE L'INSE 

PIANTO AI PRODOTTI DELL'ULTIMO AMO 

RIMENTO DEI DATI 

916 D = 0 

505 IF SA = 3 THEN Z = (L - 1) * Q 

930 PM = I: REM PONGO 1 PER EVITARE ERRORI DI DIVISIONI PER 

510 FOR I = L TO K 

ZERO 

515 BUI = 75 * <1 + SU) / PM) 

935 FOR I = 1 TO N 

520 IF B(I) ) 145 THEN SU) = 145: REM EVITO DI USCIRE DAL 

940 IF PU) > PM THEN PM = FU) 

LA PAGINA GRAFICA 

945 NEXT : REM IL VALORE MAX. DI PU) SERVE PER DIMENSIONA 

530 HPLO: 2,75 TO Z + Q,75 TO Z ♦ Q,B(I) TO Z,BU) TO Z,?5 

RE IL GRAFICO 

540 Z = Z + O 

950 TEXT : HOME :L = 1:K = N: GOSUB 410: REM COMPONI IL GR 

545 NEXT 1: REM IL GRAFICO DELLE SPESE E'COMPLETATO 

AFICO DEFINITIVO 

555 RETURN 

970 'VTAB 22: PRINT ‘CONFERMI 1 PRODOTTI INSERITI? S/N *: GET 

599 REM --- 

Ai 

600 REM GRAFICO PROVVISORIO 

975 IF Ai = ‘N‘ THEN HOME : GOTO 825 

601 REM - 

1009 REM -- 

615 REM COMPARE SOLO DURANTE L'ASSEGNAZIONE DE! PRODOTTI 

1010 REM ASSEGNA LE SPESE 

625 REM CQf’fTRQLLO L'ORDINATA 

101! REM - 

630 IF X<I) = 0 THEN U = 80: BOTO 670 

1025 HOME 

635 FOR J = AA TO A: IF X<!) > PK THEN U = U - 20: GOTO 650 

1030 VTAB 23: PRINT “ASSEGNAZIONE DELLE SPESE (RETURN) 1 : GET 

: NEXT 

Zi: HOME 

640 FOR J = AA TO A: IF X(I) < PK THEN U = U + 35: GOTO 645 

1040 VTAB 22: PRINT ‘A = AfWO DI FINE STAZIONE" 

: NEXT 

1045 PRINT ‘S = SPESA AMUA“ 

645 IF U > 80 THEN U = 75: GOTO 670 

1050 AA = 0:1 = 0:2 = 0: REM AZZERA LE 'VARIABILI 

650 IF Li < 5 THEN U = 2: GOTO 670: REM 

1070 INPUT ‘A = ‘;AC 

670 FOR J = AA * G TO A * Q: HPLOT J,80 TO J,W: NEXT 

1072 A = INT (AC): REM MI GARANTISCO CONTRO GLI ERRORI DI 

675 PK = XU): RETURN 

BATTUTA 

699 REM ... 

1074 A3 = AA ♦ 1 

700 REM PER FACILITARTI AD 

1075 IF A < = (AA) THEN PRINT ‘NON MENO DI *;A3: GOTO 107 

701 REM INSERIRE i VALORI 

0 

702 REM - 

1080 IF A > N THEN PRINT ‘NON PIU' DI ‘:N: GOTO 1070 

705 6M = 1000000 

1082 IF A ( AC THEN PRINT “ACCETTO L'INTERO:A=“;A 

710 HTAB S: VTAB 9: PRIMI ‘CON QUALE LNITA DI MISURA 1 

1090 HTAB 23: VTAB 23: INPUT “S= “;BS 

711 HTAB 8: VTAB 10: PRIMI "VUOI INTRODURRE I VALORI?" 

1091 IF BS < 0 THEN PRINT “NON ACCETTATO': GOTO 1090: REM, 

715 HTAB 8: VTAB 14: PRIMI UNITA DI LIRE <1>“ 

MI GARANTISCO CONTRO GLI ERRORI DI BATTUTA 

720 HTAB 8: VTAB 16: PR1NT "MIGLIAIA DI LIRE (2>“ 

1D92 XU) = BS * BM 

725 HTAB 8: VTAB 18: PRIMI “MILIONI DI LIRE (RETURN)* 

1095 IF XU) = 0 THEN GOTO ! 120 

730 HTAB 8: 'VTAB 21: INPUT ‘ASPETTO CHE TU SCELGA ■sSZ* 

1100 PRINT "POST.(RTN>/ ANTIC.d)/ MED ANTIC.<2> 

735 IF BZi = ■!■ THEN BM = ! 

1106 INPUT Zi: REM PER PORTARE LE SPESE A FINE AMO, VEDI 

736 IF BZi = "2 1 THEN BM = 1000 

1165 

740 HOME : RETURN 

1115 Z(I) = VAL (Zi) 

744 REM - 

1120 FOR J = AA t ! TO A:S0(J) = XU):S(J) = S0(J):K(J) = Z 

745 REM PRESENTA LE SOMMATORIE 

(1); NEXT 

746 REM - 

1130 FOR J = N + AA + ITON + A:S0(J) = X(I):S(J) = S0(J): 

750 HOME : HTAB 4: VTAB 6: PRINT "30MM. PRODOTTI LIRE ":SP 

K(J) = ZU): NEXT 

755 HTAB 4: VTAB 8: PRINT "SOMM, SPESE LIRE “:SS 

1131 REM ANALOGO AD 890 

760 HTAB 4: VTAB 10: PRINT ‘REDDITI LIRE *:SR 

1135 L = AA + 1 :K = A: GOSUB 505 

770 RETURN 

1140 AA = A: REM INCREMENTA “A" :D=0 

795 HTAB 30: VTAB 23: PRINT ‘(RETURN)':: GEI Zi: RETURN 

1145 IF A = N THEN GOTO USO 

805 REM - 

1148 GOTO 1070: SEM INSERISCI LE ALTRE SPESE 

810 REM ASSEGNA I PRODOTTI 

1150 INPUT ‘SPESE PER LO SPIANTO, LIRE ‘;D: HOME 

815 REM - 

115! D = D * BM: REM VEDI 700 

820 GOSUB 700 

1152 VTAB 22: PRINT ‘CONFERMI LE SPESE INSERITE? 5,14": GET 

825 HGR : HCOLOR= 3: HPLOT 0,80 TO N * Q,80: REM TRACCIA IN 

Ai 

A LINEA 

1155 IF Ai = *N* THEN GOTO 950: REM AZZERA LE SPESE E RIO 

830 FOR I = 0 TO N * S STEP Q: HPLOT 1,82 TO 1,78: NEXT : SEM 

CUPONI IL GRAFICO 

INDICA GLI INTERVALLI DEGLI ANNI 

1160 HOME : VTAB 23: INPUT ‘INDICA IL TASSO DI CAP1TAL1ZZAZ 

835 VTAB 23: PRINT "ASSEGNAZIONE DEI PRODOTTI (RETURN) 1 : SET 

IONE (XX)'ìBB 

2$: HOME 

1161 R = BB / 100: IF BB = 0 THEN PRINT “SCEGLI UN TASSO PO 

840 VTAB 22: PRINT ‘A = AMO DI FINE STAZIONE* 

SIT’VO*: GOSUB 795: GOTO 1160 

845 PRINT *P = PRODOTTO ANNUO POSTICIPATO 1 : PRINT 1 ■ 

1162 TEXT : HOME : HTAB 11: VTAB 10: PRINT 'ESEGUO I CALCOL 

850 AA = 0:1 = 0:PK = 0: REM AZZERA LE 'VARIABILI 

T ? 

855 W = 80: REM SERVE PER IL GRAFICO PROVVISORIO 

1165 FOR i = 1 TO N2: REM RIFERISCO LE SPESE A FINE AMO 

860 INPUT “Af ';A6 

1170 IF K(J) = 1 THEN S<J) = S0(J> * (1 * R) 

362 A = IMI (AB): REM HI GARANTISCO CONTRO SU ERRORI DI B 

1175 IF K<J) = 2 THEN S(J) = S0<J) * ( ! t R / 2) 

ATTUTA 

1180 NEXT 

864 A2 = AA + I 

1185 S(N) = S(N) * D:S(N2) = S(N2> 4 D 

865 IF A ( = (AA) THEN PRINT ‘NON MENO DI ";A2: GOTO 860 

1190 D = 0: REM ASSEGNA LE SPESE DELLO SPIANTO ALL'ULTIMO 

670 IF A > N THEN PRINT ‘NON PIU' DI * jN: GOTO 360 

ANNO DEL CICLO 

372 IF A ( AB THEN PRINT ‘ACCETTO L'INTERO:A=*:A 

1195 BD = 1: REM SERVE PER LA 504 

875 HTAB 23: VTAB 23: INPUT *P= “;BP 

1204 REM - - - 

876 IF BP < 0 THEN PRINT ‘NON ACCETTATO": GOTO 875: REM 

1205 REM SOLUZIONE DEL PROBLEMA 

MI GARANTISCO CONTRO GLI ERRORI DI BATTUTA 

1206 SEM -- - 

877 XU) = SP t BM 

1210 GOSUB 5000: REM 'VAI AL MENU 

680 FOR J = AA + ! TO A:P(.J) = X<I): NEXT 

1214 HOME : HTAB 10: VTAB 7: PRINT ‘ .‘ 

885 FOR J = N + AA M TO N + A:P<J) = XU): NEXT 


890 REM SU DUE CICLI SUCCESSIVI.ASSEGNA LA PRODUZIONE AGLI 

1215 HTAB 10: ‘VTAB 9: PRINT “SOLUZIONE DEL PROBLEMA" 

ANNI 0! COMPETENZA 

1216 HTAB 10: VTAB lì: PRINT ’. 

894 GOSUB 600 

1220 IF BC = 3 THEN GOTO 1350 REM CALCOLA SOLO VM, CICLI 

895 IF A = N THEN GOTO 910: REM FINE DELL'ASSEGtWZIQNE P 

FITTIZI 

RODOTTI 

1224 REM - 

900 AA = A: GOTO 860: REM ASSEGNA GLI ALTRI VALOR! 

1225 REM CALCOLO DEL VALORE TERRA: VO 

906 D = 0 

1226 REM .... 

910 INPUT ‘RICAVI PER LO SPIANTO, LIRE ‘ ;D 

1230 VTAB 14: PRINT “CALCOLO DEL VALORE TERRA: VO* 
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123! 
1235 
1240 

12-15 

1250 

1255 

1260 

1270 

1275 

1280 

1285 

1305 

1310 

1320 

1325 

1330 

1340 

1345 

1350 

1355 

1399 

1400 

1401 
1405 
1410 
1420 
1422 

1424 

1426 

1428 

1430 

1434 

1435 

1436 

1439 

1440 
1445 
1450 

1455 

1470 

1475 

1480 

1485 

1490 

1495 

1500 

1505 

1510 

1520 

1525 

1530 

1535 

1540 

1545 

1550 

1555 

1560 

1565 

1570 

1575 

1599 

1600 
1601 
1620 
1625 
1640 

1645 

1650 

1655 

1660 

1661 

1670 


PRINT 1 - " 

GOSUB 795 

K = N:L =li REM DETERMINA L'INTERVALLO DI TEMPO DA CO 
NS!DERARE 
GOSUB 222 

HOME : PRINT 'VUOI CONTROLLARE ! DATI INSERITI? S/N* 
GEI Ci: HOME 

!F Ci = *S* THEN GOSUB 310 
PRINT » CUOI VEDERE IL GRAFICO? S/N* 

SET Di; HOME 

!F Di = *S* THEN GOSUB 410 

GOSUB 795; TEXT 

REM PRESENTA I RISULTATI 

REM . 

GOSUB 745 
GOSUB 795 

VO = SR / <((1 4 R) ' N) - 1); REM FORMULA DI VO 
HTAB 10; VTAB 16: PRINT "VALORE DEL CAPITALE TERRA* 
HTAB 16; VTAB 18; PRINT "LIRE *;V0 
GOSUB 795: HOME 

IF 8C = 2 THEN GOTO 2000: REM HA CALCOLATO SOLO VO 

REM- 

REM CALCOLO DI VM 
REM. 

HTAB 10: VTAB 7: PRINT * CALCOLO DI VM" 

HTAB 10: VTAB 9: PRINT * —." 

VTAB 12: INPUT ‘INDICA L'ANNO DI STIMA, M= *:MA 

M = JNT (MA): REM MI GARANTISCO CONTRO GLI ERRORI DI 

BATTUTA 

IF M < 1 THEN PRINT ‘NON ACCETTATO*: GOTO 1350 
IF M = > N THEN PRINT ‘NON ACCETTATO 1 : GOTO 1350 
IF M < (MA) THEN PRINT ‘ACCETTO SOLO L'INTERO: M= *; 
M: GOSUB 795 

IF BC > 3 THEN GOTO 1570: REM SALTA VM, CICLO FITTI 
ZIO 

REM - 

REM VM: METODO DEL CICLO FITTIZIO 

REM -. 

HOME 

HTAB 6: VTAB 10: PRINT “< METODO DEL CICLO FITTIZIO >‘ 
GOSUB 795 

K= N + H:L = M + 1: REM INDICA L'INTERVALLO DEL CICLO 
FITTIZIO 
GOSUB 222 

PRINT "VUOI CONTROLLARE I DAT! INSERITI? S/N ‘ 

GET Ci: HOME 

IF Ci = *S‘ THEN GOSUB 310 
PRINT ‘VUOI VEDERE IL GRAFICO? S/N* 

GET Di: HOME 

IF Di = ’S‘ THEN GOSUB 410 

GDSUB 795: TEXT 

REM PRESENTA I RISULTATI 

REM - 

GOSUB 745 
GOSUB 795 

VI = SR / (((1 4 R) ‘ N) - 1): REM FORMULA DI VM, C1CL 
0 FITTIZIO 

IF BC = 3 THEN GOTO 1550: REM VO NON E STATO CALCOLA 
TO 

HTAB 10: VTAB 14: PRINT ‘VALORE DEL CAPITALE TERRA 1 
HTAB 14: VTAB 16: PRINT ‘LIRE ! :V0 
HTAB 1: 'VTAB 19: PRINT "VALORE DEL FRUTTETO, METODO DE 
L CICLO 1 

VTAB 21: PRINT "FITTIZIO, LIRE ’:V1 
GOSUB 795: HOME 

IF BC = 3 THEN GOTO 2000: REM HA CALCOLATO SOLO VM, 
CICLI FITTIZI 

IF BC = 5 THEN GOTO 1800: REM VAI A 'VM,REDDITI PASSA 
TI 
HOME 

REM- 

REM METODO DEI REDDITI FUTURI 

REM -...— 

HTAB 6: VTAB IO; PRINT ■< METODO DEI REDDITI FUTURI >• 
GOSUB 795 

L = M + l:k = N: REM INDICA L'INTERVALLO DI TEMPO CONS 
1 DERATO 
GOSUB 222 

PRINT ‘VUOI CONTROLLARE I DAT! INSERITI’ S/N" 

GET Ci: HOME 

IF CI = ‘S“ THEN GOSUB 310 
BA = 3: REM SERVE PER LA POSIZIONE DEL GRAFICO 
PRINT ‘VUOI VEDERE IL GRAFICO? S/N" 


1675 GET Di: HOME 

1630 IF Di = ‘S‘ THEN GOSUB 410 

1685 BA = 0 

1690 GOSUB 795: TEXT 

1705 REM PRESENTA I RISULTATI 

1710 REM . 

1720 GOSUB 745 
1725 GOSUB 795 

1730 V2 = (VO + SR) / (1 4 R) • (N - M): REM FORMULA DI VM, 
REDDITI FUTURI 

1740 HTAB 10: VTAB 14: PRINT "'VALORE DEL CAPITALE TERRA’ 

1745 HTAB 16: VTAB 16: PRINT * LIRE ":V0 

1750 VTAB 19: PRINT ‘VALORE DEL FRUTTETO, METODO DE! REDDI‘ 

1755 VTAB 21: PRINT *TI FUTURI, LIRE ‘;V2 

1760 GOSUB 795: HOME 

1765 IF BC < ) 4 THEN GOTO 1800 

1770 PRINT ‘VUOI CONOSCERE VS? S/N* 

1771 GET B$: HOME 

1775 IF Bi = *N* THEN GOTO 2000 

1780 VS = V2 - VO: GOTO 1960: REM PRESENTA VS 

1799 REM - 

1800 REM METODO DEI REDDITI PASSATI 

180! REM . 

1805 HOME 

1820 HTAB 6: VTAB 10: PRINT '< METODO DEI REDDITI PASSATI > 

P 

1825 GOSUB 795: HOME 

1840 K = M:L = 1: REM INDICA L'INTERVALLO DI TEMPO CONSIDE 
RATO 

1845 GOSUB 222 

1850 PRINT ‘VUOI CONTROLLARE ! DATI INSERITI? S/N* 

1855 GET Ci: HOME 

1860 !F Ci = *S* THEN GOSUB 310 

1870 PRINT ‘VUOI VEDERE IL GRAFICO? S/N“ 

1875 GET Di: HOME 

1880 IF Di = *5’ THEN GOSUB 410 

1890 GOSUB 795: TEXT 

1900 REM PRESENTA ! RISULTATI 

1901 REM -.. 

1905 GOSUB 745 

1910 GOSUB 795 

1915 V3 = VO * (! 4 R) ■ M - SR: REM FORMULA DI VM, REDDITI 
PASSATI 

1920 HTAB IO: VTAB 14: PRINT ‘VALORE DEL CAPITALE TERRA* 

1925 HTAB 16: VTAB 16: PRINT 1 LIRE *:V0 

1930 VTAB 19: PRINT 'VALORE DEL FRUTTETO, METODO DEI REDDI* 

1935 VTAB 2!: PRINT *TI PASSATI, LIRE *:V3 

1936 GOSUB 795: HOME 

1939 REM..- 

1940 REM VALORE DEL SOPRASSUOLO 

194! RB< -- 

1945 IF BC = 1 THEN GOTO 1957: REM CALCOLA VS 
1950 PRINT "VUOI CONOSCERE VS? S/N' 

1952 GET Ai: HOME 

1955 IF Ai = *N* THEN GOTO 2000 

1957 VS = V3 - VO 

1960 HTAB 10: VTAB 7: PRINT "CALCOLO DI VS" 

1961 HTAB 10: VTAB 8: PRINT *--. 

1964 GOSUB 795 

1970 HTAB 2: VTAB 11: IF BC < >4 THEN PRINT 'VALORE DEL 
FRUTTETO L.*;V3 

1975 HTAB 2: VTAB 11: IF BC = 4 THEN PRINT "VALORE DEL FRU 
TTETO L.":V2 

1980 HTAB 2: VTAB 13: PRINT "VALORE DEL TERRENO L.‘;V0 

1985 HTAB 2: VTAB 16: PRINT "SOPRASSUOLO L.*;VS 

1990 GOSUB ?P5: HOME 

1999 REM -- 

2000 REM CONCLUSIONI 

200! REM . 

2005 HTAB 8: 'VTAB 4: PRINT ‘RIASSUMENDO:* 

2010 HTAB 8: VTAB 7: PRINT ‘TASSO DI CAP., R= *:BB:*X* 

2015 HTAB 1: VTAB 17: IF BC = 2 THEN PRINT ‘L'iWIÒ DI STIM 

A NON E' STATO INDICATO' 

2020 HTAB 8: VTAB ?: IF BC < >2 THEN PRINT ‘AUTO DI STIM 
A M= ‘:M: PRINT ‘ * 

2021 PRINT 1 ‘ 

2025 IF VO = 0 THEN GOTO 2035 

2030 HTAB 8: VTAB 12: PRINT ‘VO = ";V0: PRINT * ‘ 

2035 IP VI = 0 THEN GOTO 2045 

2040 HTAB 8: PRINT ‘VM = =:VI:‘ CICLI FITTIZI’: PRINT ‘ ’ 
2045 IF V2 = 0 THEN GOTO 2055 

Continua 
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scuola 


2050 

2055 

2060 

2065 

2070 

2030 

2100 

2105 

2110 

2115 

2120 

2130 

2140 

2150 

2999 

3000 
300! 
3005 
3010 
3020 
3030 
3040 
3050 


H7AB 8: PRINT 8 vH = ':V2:‘ REDDITI FUTURI * : FRINÌ ' * 
IF '33 = 0 THEN GOTO 2085 

HTAB 3: FRINÌ “JM = “ ;U3; " REDDITI PASSATI * : PRINT 1 ‘ 

IF US = 0 THEN GOTO 2080 

HTAB 8: PRINT ‘VS = ’;VS: PRINT ' ' 

GGSUB 795; HOME 

PRINT “VUOI RIPROVARE’ S/N" 

SET Ai: FRINÌ 8 ‘ 

IF Ai = “N* THEN PRINT “END”: END 
VO = 0:V1 = 0;V2 = 0:V3 = 0 :VS = 0:M = 0 : REM AZZERA I 
VALOR! 

PRINT 'VUOI CAMBIARE IL TASSO? 5VN* 

SET B$; FRINÌ 8 8 

IF Bi = "S‘ THEN INPUT ‘INDICA IL NUOVO TASSO X(Z) m jB 
E; GOTO ìlàl 
GOTO 1205 

REM - 

REM INIZIO 

REM - 

HOME 

HTAB IO; VTAS 8i PRINT ’«******«********■ 

HTAB iÓ: VTAB 10: PRINT "STIMA DE! FRUTTETI 8 
HTAB 10: VTAB 12; PRINT ******************** 


GGSUB 795 
HOME : HTAB 5: PRINT ‘STIMA 
COETANEO,NELL"IPOTESI CHE IL 
EMENTE SULLO STESSO TERRENO 


lì UN FRUTTETO Ai 
SUO CICLO SI PIPI 


.10 E 
ERENN 


3030 HTAB I: VTAB Si PRINT 
3070 HTAB 1: VTAB 10 :'PRINT ' 
3080 HTAB 1: VTAB 12: PRINT ■ 

3109 HTAB 12: VTAB 14: PRINT 

3110 HTAB 12: VTAB 16: PRINT 
3120 HTAB 12: VTAB 18: PRINT 


STIMA DEL CAPITALE TERRA: VO* 
•STIMA DEL FRUTTETO IN UN" 
ANNO INTERMEDIO DEL CICLO" 

T) METODO DEL CICLO FITTIZIO 1 
7) METODO DE! REDDITI FUTURI' 
'31 METODO DEI REDDITI PASSATI 


3125 HTAB I: VTAB 20: PRINT ‘-VALORE DEL SOPRASSUOLO: VS 

3999 REM---- 

4000 REM ASSEGNA LUNGHEZZA CICLO 

400! REM - 


4040 GOSUB 795: HOME 

4050 HOME : PRINT "INDICA LA LUNGHEZZA DEL CICLO" 

4060 VTAB 5: PRINT "(MX SO ANNI ) 8 : : INPUT ‘N= ':NB 
4062 N = INT (NB) : REM HI GARANTISCO CONTRO GLI ERRORI DI 
BATTUTA 

4070 !F N > 80 THEN PRINT ‘NON ACCETTATO': GOTO 4000 
4075 IF N < * THEN PRINT "NON ACCETTATO 8 : GOTO 4000 
4080 IF N < NB THEN PRINT ‘ACCETTO SOLO L'INTERO: N= ‘;N 
4085 0 = INT (270 / N): REM E' L'UNITA' DI MISURA CHE DIM 
ENSiONA L'ASCISSA DEL GRAFICO 
4090 N2 = 2 * N 

4100 DIM X(N2),Y(N2),M(N2),F<N2),PiN2) ,S(N2),B(N2) ,K(N2) ,Z< 
N2),S0(N2) 

4105 GOSUB 795: HOME 

4110 GOTO 810: REM ASSEGNA I DATI 

4998 REM 

4999 REM - 

5000 REM ME N U 

500! REM - 

5002 REM 

5005 HOME 

5010 HTAB 7: VTAB 6: PRINT ‘QUALI ‘VALORI Ti INTERESSANO?" 
5020 HTAB 7: VTAB 9; PRINT “-TUTTI I VALORI (1>“ 

5030 HTAB 7: VTAB 11: PRINT ‘-SOLO VO <2> 

E 

5040 ^HTAB 7: VTAB 13: PRINT ’-SOLO VM, CICLO FITTIZIO <3> 

5050 HTAB 7: VTAB 15: PRINT "-V0 E VM, REDDITI FUTURI (4) 

■ 

5060 HTAB 7: ‘VTAB 17: PRINT ‘-VO E ‘VM, REDDITI PASSATI <5> 

I 

5070 HTAB 7: VTAB 19: FRI ITT ‘-PER VS: SCEGLI 0 <4>, 0 <5> 

5080 HTAB 7: VTAB 22: INPUT ‘-ASPETTO CHE TU SCELGA *; 

BC 

5090 IF BC > 5 THEN BC = 1 

5100 IF BC < ! THEN BC = 1: REM MI GARANTISCO CONTRO GLI E 

RRORI DI BATTUTA 
5110 RETURN 


simili del frutteto, cioè cinque o sei 
valori prima crescenti e poi decrescen¬ 
ti. Rispetto ad altri metodi, tuttavia, 
questo metodo offre il vantaggio di 
non dover predeterminare il numero 
delle stazioni del frutteto e di non do¬ 
ver inserire anticipatamente il numero 
dei fattori di riduzione in scala. 

Comunque, appena assegnati tutti i 
prodotti, il programma ricerca auto¬ 
maticamente il fattore di riduzione in 
scala (denotato con PM, prodotto 
massimo assegnato) e ridisegna il gra¬ 
fico. 

4) per le spese si ripetono le stesse 
sequenze: (A=anno; S=spese) ; però, 
quando S è diverso da zero, bisogna 
rispondere a un’ulteriore domanda: 


spese anticipate <1>; 
mediamente anticipate <2>; 
posticipate <RETURN>. 


La sequenza dei valori da inserire 
nell’esempio considerato è quindi: 


a=l s=6 <1> 

a=3 s=2 <RETURN> 

a=10 s=l. 1 <2> 

a=24 s=l. 6 <2> 

a=28 s=l. 3 <2> 


spese per lo spianto: O 


5) l’ultimo dato richiesto è il tasso di 
capitalizzazione (per esempio, 5%). 

Da questo momento il computer è 
predisposto per risolvere il problema e 
invita a scegliere gli argomenti che in¬ 
teressano, avvertendo pure che per 
VS dobbiamo prima calcolare VO e 
VM. In base alle scelte esso procede 
nei calcoli, chiedendoci al momento 
opportuno l’anno di stima (per esem¬ 
pio, 12). Alla fine di ogni calcolo ci 
presenta i risultati. Il programma ter¬ 
mina poi con un quadro riassuntivo dei 
valori e con la possibilità offertaci di 
ripetere i calcoli, variando a piacere il 
tasso di capitalizzazione e l’anno di 
stima. 

Il tempo reale di esecuzione del pro¬ 
gramma è di pochi minuti; volendo 
risolvere lo stesso problema con il me¬ 
todo tradizionale (calcolatrice tascabi¬ 
le e tavole finanziarie) non sarebbe 
sufficiente un’intera ora. 

Un avvertimento: può succedere 
che, nel calcolare VM con tre metodi, i 
risultati non coincidano: non c’è da 
preoccuparsi, la causa è solo degli ar¬ 
rotondamenti. Infatti le tre formule 
sono delle identità matematiche. 


Osservazione 

importante 

Poiché il programma è lungo, qua¬ 
lora fosse caricato in memoria dalla 
posizione usuale (2048) esso invade¬ 
rebbe la zona di memoria destinata 
alla prima pagina grafica 
(8192—16383). Il risultato sarebbe che 
all’apertura della pagina grafica, con il 
comando HGR, la parte di program¬ 
ma che invade la pagina grafica ver¬ 
rebbe cancellata. Per evitare questo 
inconveniente, sono state introdotte le 
due righe 10—20 che provvedono a ca¬ 
ricare il programma sopra la prima pa¬ 
gina grafica. È però necessario salvare 
il programma con lo stesso nome con¬ 
tenuto nella 20, cioè FRUTTETI. 

Se dopo questo programma si fanno 
girare altri programmi, questi vengo¬ 
no sempre caricati sopra la prima pagi¬ 
na grafica. Per ripristinare la posizione 
usuale si deve battere FP. 

Francesco Scopel 


Questo programma è disponibile su di¬ 
schetto. L’elenco, i prezzi e le modalità 
d’ordine di questo e degli altri dischetti 
disponibili sono riportati nella rubrica 
Disk Service. 

-* 
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un telefono anche al tuo computer 



Personal computer CX-21 

(Chiamante) 


Centrale telefonica 


CX-21 Personal computer 
(Chiamato) 


L'accoppiatore acustico CX-21 del¬ 
la Epson è uno strumento conveniente e 
affidabile dalle grandi prestazioni che 
dà la nuova dimensione delle telecomu¬ 
nicazioni al vostro computer. 

Il CX-21 funziona a batterie ricarica¬ 
bili ed è particolarmente adatto ai per¬ 
sonal computer portatili, come 0 PX-8 e 
HX-20, per esempio. 

Per accedere alle informazioni di 
una banca dati, o più semplicemente 
per comunicare con un altro computer 
basta inserire la cornetta e comporre il 
numero telefonico corrispondente. 

Leggero, compatto, elegante ed af¬ 
fidabile il CX-21 è progettato per adat¬ 
tarsi a tutti gli apparecchi telefonici e 
consentire lo scambio rapido e sicuro di 
programmi e dati. 

Caratteristiche 



EPSON 


Realizzato con speciali circuiti inte¬ 
grati CMOS 

Funzionamento a batterie NiCd ricari¬ 
cabili 

Funzionamento full-duplex o half-du- 
plex 

Velocità di trasmissione fino a 300 bit- 

S0C. 

- Interfaccia RS 232C 

- Dimensioni 297x95x42 mm 

- Peso 700 gr. 


< ^o s oJi 






EPSON CX-21 

Accoppiatore acustico 


da SEGI S.p.A. - Milano Via Tt 





















































applicando 


si trova anche qui 

Ecco un elenco dei computer shop presso i quali è possibile abbonarsi ad Applicando, 
acquistare una copia, cercare un numero arretrato... 


LOMBARDIA 


Almé (BG) 

Elcod Viale Italia 45/A 

Assago(MI) 

Basic Computers Centro 
Commerciale Milano Fiori 

Bergamo 

Studio 15 srl Via Quarenghi 60 
li mondo dell’informatica 
ViaPitentino8 

Brescia 

Alfa computer Via Bassi 26 
Brescia Computers srl 
Via Malta 12 

Il Computer srl Via B.Croce 23 
L ’Informatica srl 
Piazza Vescovado 1 
Personal Data di Tamiozzo D. 
Via Brozzoni 4 

Como 

D.S.I.srlV ia Dottesio 8 

Como-Albate 

Accaesse Informatica srl 
Via Acquanera 46 

Lecco (CO) 

Computers Lecco snc 
Via Nino Bixio 18/B 
Datamation Via Turati 10 

Bissone (MI) 
Computerlandia-Polli 
Via Martiri Libertà 103 

Milano 

A.G. Informatica srl 
ViaG.Silva49 

Communications Engineering 
Piazza Firenze 4 


Deltron srl Viale Gran Sasso 50 
Edelektron srl 
Corso Sempione 39 
Esprit Via Bergamini 13 
Happy System Piazza Diaz 6 
All’Informatica Sltop 
Via Lazzaretto 2 
Macan sas Via Broletto 39 
Microtech Sistemi Via Piave 7 
SH Computers srl 
Viale Montenero 33 
Softec Computer 
Viale E. Jenner23 

Monza (MI) 

ESI srl Via Cavallotti 11 
Nikom Electronics Via Asiago 7 

Pavia 

M.A.S.H. Computer Systems 
Strada Nuova 86 
Senna Gianfranco snc 
Via Calchi 5 

Trezzano sul naviglio (MI) 

Personal computer shop 
Via L.da Vinci 36 

Segrate (MI) 

Compusoft di R. Massaroli 
Via Milano 2 - Resid. Lago 
Varese 

IRPEsrl Via Morazzone 8 

LAZIO 


Roma 

Computer Center srl 

Via Nizza 48/52 

Computerart srl 

Via Michele di Landò 41 

Compatirne srl 

Via Cola di Rienzo 28 

Easy Byte Via Giov. Villani 24 


E.D.P. Market 
Via E. Fermi 116/118 
E.M. EUR Micro Computer srl 
Viale C. Pavese 267 

5.1. G E.E.l. srl 

Via Nomentana 265-273 

5.1. PR.EL.srl 

Via Pompeo Magno 94 

Roma EUR 

Bit Computers 
Via F. Domiziano 10 

Roma Mostacciano 

Bit Computers 

Via Giovanni Gastaldi 33 

Viterbo 

Alfa Computer 

Via Palmanova 12/C 

VENETO 


Bassotto del Grappa (VI) 

A Tre snc di Arcangeli <4 C. 

Via Buonarroti 23 

Conegliano (TV) 

Computing Program di Branca 
Via G. Piovesana 32 

Mestre (VE) 

Pacinotlisas Via Torino 92 

Mirano (VE) 

Saving Elettronica di Miatto 
Via Gramsci 40 

Padova 

Capovilla & C. sas 
Galleria Scrovegni 5 
Computer Service srl 
Via Beethoven 3 
E.D.P. Sistemi srl 
Via Borromeo 16 


Treviso 

A5 Computers srl 
Borgo Cavour 37/A 

Venezia 
AZ Telemarket 
Cannaregio 5898 
Personal Computer di 
Mariconda Canareggio 

Verona 

ARMUsrl 

Via Teatro Filarmonico 3 
EsacompsrlV ia Roveggia43 
MOS 80sas Via Germania 21 

Vicenza 

Sevi sas Via S. Agostino 87 

Villafranca (VR) 

Studio 4 C.so V. Emanuele 70 

PIEMONTE 
VALLE D’AOSTA 

Aosta 

Informatique sas di Eddy Ottoz 
Av. Conseil des Commis 14 

Alba(CN) 

CentrocomputerVia Paruzza 2 

Biella (VC) 

Consul Computer srl 
Via delle Rose 2 
Informatica Biella sas 
Piazza S.Paolo 1/B 

Domodossola (NO) 

Nuova Elettronica 
Via Giovanni XXIII68 

Pinerolo (TO) 

Elaborazione Dati Pinerolo 
Corso Piave 42 
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Torino 

A. B. Computer sas 
Corso Grosseto 209 
Digitalsync snc 
Corso Moncalieri 303 
Dimensione Personal 
Via Bertola 22/e 
GE.NE.CA. sr/Via Bertola5 
Hobby Elettronica 
Via Saluzzo 11/F-G-H 
Omicron Computers snc 
C.so Duca degli Abruzzi 14 
Piato G.-Componenti elettr. 
Corso Principe Eugenio 15 bis 
Tecnosystem Computer Shop 
ViaBeaumont 10 
Tekno Computers srl 
Via Madama Cristina 31/c' 

TOSCANA 


Borgo a Baggiano (PT) 

CO-DI snc ai G. Gatti-Chiti 
Via 24 Maggio 117/119 

Grosseto 

Computer’s Shop (C.I.S.I.D.) 
Via Papa Giovanni XXIII47/49 

Firenze 

Anfrel Informatica sas di F. 
Giagnoni & C. Via Masaccio 50 
Elettronica Cento Stelle sri 
Via Cento Stelle 5/B 
Paoletti Ferrerò 
Via il Prato 40/42 R 
Pascal Tripodo Elettronica 
Via B. della Gatta 26/28 
Soluzioni EDPsrl 
Corso dei Tintori 39R 

Massa 

Euro Computer sas 
Piazza C. Bertagnini4 

Piombino (LI) 

Centro Ufficio sdf 
Via F.Ferrer 37/39 

Pisa 

Società Elettronica Tirrena 
Via Fucini 20 

Pistoia 

Inter Systems 

Via Pietro Mascagni 14 

Pistoia Frazione Margine 

CO-DI snc Via I Maggio 20/22 

Pontedera(PI) 

Data Portsrl 

Via Brigate Partigiane 27 

TerranuovaB.ni(AR) 

ICS srl Via Roma 10 

EMILIA ROMAGNA 

Bologna 

CEDA Minicomp srl 
Piazza Aldrovandi 2/2 
Computer Systems 
Via Ercolani 10/D 
EDP Sistemi BOsrl 
Viale Pietramelara 61/F 
SERCOM Via B. da Carpi 9/B 


Cesena (FO) 

SHCsnc Corso Cavour 157 

Ferrara 

Soc. Termomeccanica 
Via Garibaldi 195 
Mazzacurati Claudio 
Viale Cavour 186/188 
Tecnomeccanica 
Via Garibaldi 195 

Fidenza (PR) 

EMA-Elettronica Industriale 
ViaBereninió 

Fiorenzuola d’Arda (PC) 

Centro Computer di Sacconi 
Corso Garibaldi 125/A 

Forlì 

A-Z Computer srl Via Cignani 7 
Kronos Via Oreste Regnoli 30 

Modena 

Masetti Elettronica srl 
Via Emilia Centro 211 

Reggio Emilia 

Computer Center srl 
Via D. Alighieri 4 
Esaprogetti Via F. Filzi 2 

Rimini 

Computer Line Via Coletti 61 

Scandiano (RE) 

Informatica System di Cheli 
Via Diaz 11/D 

Viserba di Rimini (FO) 

Computer Center 
Via Pallotta 25/A 

FRIULI VENEZIA 
GIULIA 


Pordenone 

Electronic Center snc 
Viale Libertà 79 

Tttrriaco (GO) 

Tecno Power Elettronica 
Via Marconi 19 

Udine 

BIT Computers 
ViaPozzuolo 107 
PS Elettronica sas Via 
Tavagnacco 89/91 C.C. 

LIGURIA 


Genova 

Computer Center 
Via San Vincenzo 129 r 
SALS Informatica srl 
Via D’Annunzio 2/35 

Lavagna (GE) 

CR2 Informatica snc 
Corso Genova 100 

La Spezia 

Softline srlWa Piave 19 

Sanremo (IM) 

A.E.S. Assemb. Elettr. S.Remo 
Via Volta 24 


Savona 

Briano snc 

Corso Tardy e Benech 20 r 

Seslri Ponente - Genova 

All Computer sas 
ViaC. Menotti 136 r 

TRENTINO 


Trento 

SI. GE. snc di Casagrande 
Via Cesare Abba2 

SICILIA 


Catania 

Centro Informatica sdf 
Via Firenze 211 
Computer Shop 
Via E. Orlando 164 
SI. EL Informatica snc 
Via Etnea 289 

Messina 

CubetasrPVia Cardines 12/14 

Milazzo (ME) 

Tectron Tecnologie Elei, srl 
Via dei Mille 

Palermo 

Informatica Commerciale spa 
Via Notarbartolo 26 

Ragusa 

Sosyco Corso V. Veneto 597 

Trapani 

Guatano Eugenio 
Via Virgilio 11 

MARCHE 


Jesi(AN) 

E. M.J. sas Via F. Conti 4 
New Computer srl 
Via N. Sauro 17/A 

Torrette di Ancona (AN) 
Sisteda srl Via Velino 5 

CAMPANIA 


Barano d’Ischia (NA) 
Matterà Antonio Via Roma 61 

Benevento 

Masone Informatica 
Viale dei Rettori 57 

Napoli 

Computer Systems srl 
Via G. Santacroce 40 
Golden Computer srl 
Via Michelangelo 7 
I. C. International Computer 
Viale A. Gramsci, 176 
La Barbera Carlo sas 
Via Toledo 320 

Salerno 

Computer System 
Via E. Bottiglieri 19 
SEDA srl 

Via Parmenide c/o Iannone 


CALABRIA 


Catanzaro 

Visicom srl 

Via Minniti Ippolito 10 

Cosenza 

Micro Systems sdf 
Via Pane Bianco 26 

Gioia Tauro (RC) 

Tecnocomp snc di Cutellé F.eR. 
Via Nazionale SS 111/117 

Spezzano Albanese (CS) 
Iannibelli Via Stragolia 48 

PUGLIA 


Bari 

L. & L. Computers srl 

Largo 2 Giugno 4 

desse spa Via Re David 176/D 

Brindisi 

SICsrl 

Viale S.Giovanni Bosco 109 

Foggia 

GE.CO.srl 

Via Valentini V. Franco 1 

Leverano (LE) 

Liberano Elettronica 
Via C.Salentina 19A/21 

Manduria(TA) 

De Pasquale Ottavio 
Via per Oria 80 

Nardo (LE) 

Solco srl Via XX Settembre 122 

BASILICATA 


Muterà 

Lucana Sistemi srl 
Via Don Minzoni4 

ABRUZZO 


Avezzano (AQ) 

Aspron Via America 10/12 

Chieti 

Computer Point sas 
Viale Unità d’Italia 5 

L’Aquila 

S.E.A.D.srl 

Via G. di Vincenzo 

Lanciano (CH) 

Electronic Microsystems 
Via della Pace 3 

MOLISE 


Campobasso 
Informatica Molisana 
Via 24 Maggio 185/189 

UMBRIA 


Cerbora di città (PG) 

Computer Post 

Via Madonna del Vento 
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©flettere 


Programmi 
per Mac 

Ho da poco tempo acqui¬ 
stato un APPLE MACIN¬ 
TOSH e con enorme soddi¬ 
sfazione lo uso con i pro¬ 
grammi di corredo, più un 
eccellente SARGON III. 
Ora dopo un po’ di pratica, 
mi trovo con la necessità di 
allargare il campo di azione, 
comprensibilmente deside¬ 
rerei corredare il mio gioiel¬ 
lo con alcuni programmi a 
basso costo. 

A basso costo dicevo, per¬ 
ché come tutti saprete un 
pacchetto per MAC costa 
un occhio. Così ci si doman¬ 
da: tutte le riviste oggi in 
commercio propongono 
programmi da digitare per¬ 
sonalmente, perché dopo al¬ 
cuni mesi dall’uscita del MI¬ 
CROSOFT BASIC che of¬ 
fre ampie possibilità di pro¬ 
grammazioni varie, la Vo¬ 
stra Spettabile Rivista non 
ha pensato di dedicare un 
capitolo a questo proposito? 

Adalberto Berselli 
Bologna 

Abbiamo pensato a questa 
possibilità, stiamo lavoran¬ 
do alacremente e presto tutti i 
possessori di Macintosh ve¬ 
dranno i risultati dei nostri 
sforzi. 


Animazione di 
una rotazione 
tridimensionale 

Ho provato a digitare "A- 
nimazione di una rotazione 
tridimensionale" pubblicato 
sul n.12—13 di Gennaio— 
Febbraio ’85. Una volta sal¬ 
vato il programma, l’ho fat¬ 
to girare. L’Apple ha scritto 
la prima videata, ma quando 
compare la scritta "Distanza 
dall’origine: 400 — 50000 — 
Default 1000" se provo ad 
inserire un dato ed a preme¬ 
re Return, scompare la scrit¬ 
ta dallo schermo con un 


"Bip!" e non ricompare più 
nulla. 

Con CTRL-RESET mi 
compare ?BED SUB¬ 
SCRIPT ERROR IN 2030. 
Premetto che la riga 2030 è 
stata copiata esattamente 
come stampata sulla rivista e 
non riesco a capire se l’erro¬ 
re è mio o nel listato. 

Gianluca Rosso 
Torino 

Normalmente tutti gli er¬ 
rori segnalati dal computer, 
tranne quelli di sintassi, non 
sono quasi mai nella riga se¬ 
gnalata ma vanno ricercati in 


altre righe soprattutto in 
quelle con richiesta di "IN¬ 
PUT' oppure nelle righe con 
il confronto "IF....THEN'. 
Ricontrolli attentamente il li¬ 
stato che, le possiamo garan¬ 
tire, è esatto, e troverà l’er¬ 
rore. 


Disk Map 

Sono un vostro abbonato, 
da poco possessore di un 
APPLE//c. Ho battuto, con¬ 
trollato e salvato su disco il 
programma DISK MAP da 


Applicando N.10. Invece di 
eseguirlo il computer scrive i 
parametri in linguaggio 
macchina. Penso, ma sono 
ancora assai inesperto, che 
occorrano modifiche al lista¬ 
to da voi pubblicato. 

In questo caso suggerisco: 
1- di scrivere se i program¬ 
mi, che via via presentate, 
girano sul l/c. 2— di apporta¬ 
re (come del resto è stato 
fatto su Applicando N.ll 
per "Tastierino") le modifi¬ 
che necessarie. 

Aldo Mascelloni 
Grosseto 

Sul N.12-13 apag.95 ab¬ 
biamo pubblicato la parte di 
listato mancante del pro¬ 
gramma DISK MAP scu¬ 
sandoci con i lettori. 

Per il primo suggerimento 
abbiamo già provveduto dal 
N.12—13 ad indicare, all'ini¬ 
zio degli articoli riguardanti i 
programmi, con quale siste¬ 
ma operativo possono fun¬ 
zionare e su quale tipo di 
APPLE. 

Per il secondo, lo teniamo 
presente e vedremo di accon¬ 
tentare tutti i lettori, ogni vol¬ 
ta che sia possibile. 


Espressioni 

Sono un possessore di un 
APPLE Ile e sono stato feli¬ 
cissimo di aver trovato un 
programma su Applicando 
N.ll che mi aiutasse a risol¬ 
vere delle espressioni. 

Però dopo aver copiato e 
salvato su dischetto il sud¬ 
detto programma, mi sono 
accorto che, anche delle ba¬ 
nalissime espressioni, non 
riusciva a risolvermele, dan¬ 
domi dei risultati sbagliati. 
Questo accadeva per tutte e 
quattro le operazioni, tran¬ 
ne che per l’elevamento a 
potenza. Ho provato a ri¬ 
controllare tutto il program¬ 
ma, ma invano. 

Claudio Cevolani 
Pieve di Cento(BO) 

Questo programma è stato 
da noi provato e riprovato in 
tutte le possibili applicazioni 


Copiate, non comprate? 

Con l’occasione vi faccio sapere che non rinnovo 
l’abbonamento poiché non ho gradito la vostra comu¬ 
nicazione "Comprate non copiate" pubblicata nel n.9 
a pag. 80. 

Personalmente anch’io sono contro il commercio 
illegale di software copiato, infatti non vendo né com¬ 
pro programmi nati dal lavoro altrui. Se mi capita 
accetto però di ricevere programmi rifondendo chi 
me li fornisce delle spese vive sostenute per i dischet¬ 
ti, le fotocopie e la spedizione. 

Chiarisco che sono solo un hobbista del computer 
(come penso la maggior parte dei vostri lettori) e che i 
programmi non mi servono per produrre denaro. An¬ 
zi, poiché insegno in una scuola superiore mi sono 
accorto che costituiscono una formidabile fonte di 
pubblicità sia per l'hardware che per il software in 
commercio. 

Se voglio studiare un programma, per es. dBaselI, 
pensate — voi che lo sapete — che dovrei sentirmi in 
colpa se me lo procuro come chiarito prima, senza 
spendere il milione e 200.000 lire + IVA del suo costo 
che costituisce un mese e mezzo del mio lavoro? 

Il programma dBaselI -per chi non lo sapesse— ha 
venduto ad oggi nel mondo circa 300.000 copie per un 
ricavo di circa 360 MILIARDI. 

Il programma è stato scritto da una sola persona. 
Quanto avrà lavorato? poniamo 10 anni? Va bene se 
lo paghiamo un miliardo all’anno? fanno 10 miliardi. 
Quanto avrà speso la casa produttrice per pubblicità e 
distribuzione? 50 miliardi? fanno in tutto 60 miliardi. 
Restano 300 MILIARDI. 

Voi che lo sapete, è questo un commercio "legale"? 
Certamente lo è poiché obbedisce alle leggi di merca¬ 
to. Ma anche la copiatura del software è una "legge di 
mercato" finché un programma che ha già fruttato 300 
miliardi di guadagno e che può essere venduto per 
100.000 lire viene venduto per un milione e mezzo di 
lire. 

Desidero leggere il parere dei lettori nei numeri 
successivi. 

A.Emilio Guarisco 
Ribera(AG) 
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Avvertenza 

Preghiamo i lettori che 
ci sottopongono dei 
quesiti di indicare 
sempre il tipo di 
computer che hanno, 
per una più agevole 
soluzione dei quesiti 
stessi. 

e non ha dato problemi di 
sorta. 

L’unica possibilità è che, 
purtroppo, Lei abbia com¬ 
messo un errore nella copia¬ 
tura del programma che le è 
sfuggito anche ad un attento 
controllo. 

Il listato è esatto perché, 
come già spiegato in altre ri¬ 
sposte, è la copia fotografica 
della stampata del listato fat¬ 
ta dal programma funzio¬ 
nante su disco. 


Investor 

Nel n.5 del bimestre gen¬ 
naio - febbraio 1984 di Ap¬ 
plicando è stato pubblicato 
il programma "Investor" che 
ho copiato con il mio com¬ 
puter. Purtroppo però, seb¬ 
bene abbia svolto numerosi 
e vani tentativi, non sono 
riuscito a farlo girare inte¬ 
gralmente. 

Infatti, chiesta l’opzione 
"Grafici" lo schermo mi evi¬ 
denzia alla linea "1780", un 
errore di "division by zero", 
e tutti i tentativi rivolti ad 
individuarne la causa, si so¬ 
no rivelati vani ed improdut¬ 
tivi. 

Francesco De Vito 
Ancona 

"Division by zero" può es¬ 
sere dovuto alla mancanza o 
all’errato inserimento di un 
dato relativo a quella opera¬ 
zione. Il listato pubblicato è 
giusto perché è la copia foto¬ 
grafica del listato del pro¬ 
gramma funzionante su 
disco. 

Rilegga attentamente l’ar¬ 
ticolo e controlli il listato e 
soprattutto gli "input". 


« « « IL MERCATINO DELLE MELE ééé 


• Cerco a prezzo conve¬ 
niente tavoletta grafica per 
Apple II completa di soft¬ 
ware e manuali. Telefona¬ 
re a Salvatore Pinelli allo 
0214399713. 

• Vendo Apple II con due 
drive, stampante, monitor 
III, scheda 2-80, language 
card e 400 programmi. 
Marco Verdesca, Res. Ar¬ 
chi Milano 2, 20090 Segra- 
te (MI). Tel. 02/2138347. 

• APPLICANDO numeri 
1,2,3,4,5 e 6 cerco in bloc¬ 
co a lire 15.000 o cambio 
con uno dei seguenti libri di 
Franco Muzzio: Il debug 
nei PC, Microsoft Basic. 
Giovanni Pietrolonardo, 
Via della Massimilla 25, 
00166 Roma. 

• Apple II Plus 48K origi¬ 
nale USA vendo a L. 
800.000. Vendo anche se¬ 
paratamente: - Scheda lan¬ 
guage card originale Apple 
con espansione memoria 
da 48 K a 64K a lire 120.000 
- Scheda per presentazione 
su video 80 colonne origi¬ 
nale Videx completa di 
softswitch per commuta¬ 
zione 80-40 colonne a lire 
150.000. Documentazione 
completa. Alberto Sona, 
Via Papa Giovanni 6, 
20090 Segrate (MI). Tel. 
0212132810 (ore pasti). 

• Vendo programma Ap- 
pleworks in edizione ingle¬ 
se, dischi e manuali origi¬ 
nali, per lire 300.000. Spe¬ 
dizione contrassegno. Te¬ 
lefonare dalle ore 9 alle 10 
al n. 0991312353. 



• Vendo per Apple II Su- 
pertoto I.O., superpro- 
gramma Totocalcio inedi¬ 
to, 3 diverse opzioni di se¬ 
lezioni incrociate (n. segni 
1X2; consecutivi; corr. er¬ 
rori), con output n. colon¬ 
ne utii, sviluppo su moni¬ 
tor o stampante a lire 
60.000 con manuale. Ro¬ 
berto Rossi, Via Lario 26, 
20159 Milano. Tel. 
0216070236 (ore serali). 

• Vendo due disk drive per 
Apple lì, Apple II, Apple 
Ile, nuovi, ancora imballa¬ 
ti, slim line, a lire 350.000 
l’uno, causa eccesso di re¬ 
gali. Felice Zaccanti, Via 
P. Capponi 3, 20145 Mila¬ 
no. Tel 02/496813 ore 
pasti. 

• Causa cambio sistema 
vendo per Apple lì dieci di¬ 
schetti doppia faccia con 
oltre 50 programmi di ogni 
genere (giochi e utility) a 
L. 100.000. Scrivere o tele¬ 
fonare a Bruno Rota, Via 
Passo di Brizio 6, 20148 
Milano. Tel. 02/4082437. 

• Vendo Apple Logo con 
relativi manuali in quanto 
me ne è stato regalato un 
altro uguale. Telefonare al¬ 
la sera allo 05231387250 
chiedendo di Ruggero Ber- 
tolotti. 

• Vendo interfaccia RTTY 
per Apple. Composta da 
scheda inseribile in uno 
slot libero e terminale ester¬ 
no con led di trasmissione e 
ricezione e 4 prese per col- 
legamento a demodulatore 
in TX e RX, tasto CW e 
PTT. Permette collega- 
menti in ASCII e BAU¬ 
DOT tra radioamatori e ri¬ 
cezione di bollettini stampa 
e meteo. Giuseppe Mili- 
sich, Viale Caldara 1313, 
20122 Milano. Tel. 
02/5462891. 

• Per errato acquisto ven¬ 
do Macintosh, Image Wri- 
ter, secondo drive, Conta¬ 
bilità generale, Multiplan, 
Chart, Mac Draw, Mac 
Project, PfsFile/Report, 
Filevision e altri program¬ 
mi. Il tutto a lire 7.500.000 


non trattabili. Tutto il ma¬ 
teriale è ancora in garan¬ 
zia. Vendo anche separata- 
mente. Carmelo Carrozzo, 
Via Genova 7, 10095 Gru- 
gliasco (TO) . Tel. 
011/713766. 

• Acquisto o scambio soft¬ 
ware musicale per Alpha- 
syntauri e Soundchaesar. 
Scambio con altro software 
musicale o anche con nuo¬ 
vissimi programmi vari per 
Apple. Cerco anche pro¬ 
grammi musicali per utiliz¬ 
zo MIDI della Passport 
Design e della Ritton Mu¬ 
sic. Domenico De Simone, 
Via Vado di Sole 6, 65100 
Pescara Colli. Telefono 
085/4151352. 

• Vendo stampante silenty- 
pe completa di interfaccia, 
tutto originale Apple. For¬ 
nita di imballo, manuale e 
rotoli di ricambio a L. 
350.000. Vendo monitor 
fosfori verdi 12 a L. 
100.000. Roberto Moretti, 
St. Torino 73, 10024 Mon- 
calieri (TO). Telefono 
011/699362. 

• Vendo Apple II 64K due 
drive e monitor con softwa¬ 
re originale di ogni tipo e 
manuali. Telefonare a 
Claudio allo 02/5397867. 

• Causa cambio sistema 
vendo per Apple II dieci di¬ 
schetti doppia faccia con 
programmi di giochi e di 
utilità (Appleworks, Pa¬ 
scal, Visidex, Flight sim. 
ecc...) a lire 100.000 telefo¬ 
nare Marco Pozzi via Ce- 
nisio 16, 20154 Milano. 
Tel. 314151. 
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applicando 



Listati senza fatica 


Tutti i programmi di Applicando possono essere trascritti e quindi salvati su 
dischetto. Ma la trascrizione è lenta e noiosa, e sbagliare fin troppo facile. 
Ecco perché Applicando offre, già pronti, i dischetti con i programmi 
sottoindicati: per ottenerli, è sufficiente inviarci il tagliando debitamente 
compilato. 


Applicando 1 

•AP1/I02 

Profitti. In tempo reale l’analisi del break-even point, punto di pareg¬ 
gio, di una qualsiasi azienda. Calendario perpetuo. Dal 1582 in poi 
tutto quello che si può sapere sui giorni passati e futuri. I tronchi del 
tesoro. Una spericolata caccia al tesoro a nuoto, fra le insidie di 
tronchi galleggianti. Lire 30.000 (abbonati 25.000). 

•AP1/N03 

Eliminatoredi Dos. Uno strumento per aumentare del 10% la capaci¬ 
tà di un normale floppy disk. Orologio. Per trasformare l'Apple // in un 
orologio con rintocchi, allarme e lancetta dei secondi. Pronti puntare 
fuoco! Guardiano di un castello abbandonato, hai 25 colpi da sparare 
contro gli intrusi. Lire 30.000 (abbonati 25.000). 

Applicando 2 
•AP2/IN04 

Costi chilometrici auto. Un programma per calcolare e confrontare i 
costi di qualunque auto. Richiamafigure. Posizionare, ingrandire, 
ruotare, cambiar colore, aggiungere figure a quelle di una tavola. 
Laser nello spazio. Battaglia a colpi di laser contro asteroidi e alieni 
per difendere la torretta spaziale. Lire 30.000 (abbonati 25.000). 

Applicando 3 

•AP3/IN05 

Sistema base. Un data base modulare con tutte le caratteristiche 
essenziali per mettere ordine nei propri archivi. Etichette. Etichette 
spiritose e bizzarre, di lavoro o di ogni genere, stampate facilmente e 
nel numero desiderato. Contratti. Con il WPL, il linguaggio di pro¬ 
grammazione dell’Apple Writer, bastano cinque minuti per un docu¬ 
mento di più pagine personalizzato. Gran catalogo. Una routine per 
avere il catalogo del dischetto su due colonne, 42 file per volta, e 
richiamarli con un solo tasto. Lire 30.000 (abbonati 25.000). 
•AP3/A06 

Equo canone (occorre Visicalc). In Visicalc un modello che permette, 
a inquilini o proprietari, l'esatto calcolo dell’equo canone. Lire 25.000 
(abbonati 20.000). 

Applicando 4 

•AP4/N07 

Lettura sprint (versione italiana e versione con frasi in inglese). Un 
reading improver per leggere di più a parità di tempo. Rompiquindici. 
Il piccolo rompicapo delle quindici pedine da ordinare nei sedici spazi a 
disposizione. Tastierino fantasma, una routine per avere a disposi¬ 
zione un tastierino numerico anche sull’Apple //. Routine di input. 
Due subroutine, una per i dati numerici l'altra per gli alfanumerici, per il 
controllo deN'input. Lire 30.000 (abbonati 25.000). 

•AP4/A09 

Organo, violino, pianoforte (dischetto Pascal, occorre language 
card o Apple //e o Ile). Ecco come si riesce a simulare i tre strumenti 
attivando l'altoparlante dell'Apple da programma. Lire 30.000 (abbo¬ 
nati 25.000). 

Applicando 5 

•AP5/N08 

Investor. In tempo reale il quadro di come vanno i propri investimenti 
in Borsa. Con 5 prospetti riepilogativi e 52 periodi di quotazione, 
Investor è uno dei programmi più completi in questo settore e in 
assoluto il più economico. Lire 70.000 (abbonati 60.000). 


•AP5/N09 

Agenda personale. Per ricordare ora per ora gli appuntamenti di un 
anno intero memorizzando fino a 15 appunti ogni giorno. Duello 
d’artiglieria. Vince chi sa calcolare meglio la velocità del vento, la 
gittata e l'elevazione della canna. Mele e freccette. Versione compu¬ 
terizzata del popolare gioco delle freccette che nulla toglie al gusto del 
far centro. Lire 30.000 (abbonati 25.000). 

Applicando 6 

"AP6/N10 

Obbligazioni/Bond Manager. Per avere un quadro completo e con¬ 
creto dei rendimenti dei titoli a reddito fisso. PucMan/Nibbler. Versio¬ 
ne in alta risoluzione per Apple del famoso videogame a gettone. Line 
finder. Questa utility permette di localizzare facilmente i segmenti di 
un programma. Lire 30.000 (abbonati 25.000). 

•AP6/N11 

Stress. In Pascal (occorre language card o Apple Ile o Ile). Per 
giocare, ma soprattutto per inventare giochi, il programma si pone in 
alternativa agli usuali videogame. Lire 55.000 (abbonati 45.000). 

Applicando 7 
•AP7/N12 

Apple pittore. Si possono realizzare sullo schermo capolavori di 
pittura, ottenendo effetti speciali di grande efficacia. Ottovolante. Un 
tutoria! per insegnare ai bambini a riconoscere i numeri che rimbalza¬ 
no sullo schermo. Diskblock. Una routine che permette di evitare che 
qualche curioso possa avere libero accesso in programmi riservati. 
Archivio per Apple. Per avere un back-up dei programmi più impor¬ 
tanti da dischetto a cassetta o viceversa. Discoteca. Una banca dati 
che tiene sotto controllo la collezione di longplaying e di cassette. 
Aiuto. Alla fine della battitura di un programma, Aiuto vi dirà quanti 
errori ci sono e a quali linee.Lire 30.000 (abbonati 25.000). 

Applicando 8 

"AP8/N13 

Cambiacomandi/Messaggi. Un programma che insegna come per¬ 
sonalizzare i messaggi propri del Dos dell'Apple. Le Mans. Un gran 
premio di formula uno da giocare in due o da soli contro il computer. 
Appleorgano. Una combinazione di linguaggio macchina e di Apple¬ 
soft che trasforma l'Apple in un melodioso organo. Lire 30.000 (abbo¬ 
nati 25.000). 

•AP8/T14 

Momento di una forza/Colpo all’asta. La dimostrazione didattica del 
ribaltamento di un corpo solido appoggiato a un piano quando viene 
applicata una forza orizzontale che supera il momento in senso oppo¬ 
sto dovuto al peso. Hard copy pagine in alta risoluzione. Se la 
stampante risponde a determinati criteri di compatibilità, con questo 
programma si possono far miracoli. Lire 30.000 (abbonati 25.000). 


Investor - ÀP5/N08 

Per seguire le azioni in Borsa, con 
grafici, media mobile a 15 e 52 
settimane, medie volume e prezzo. 














Applicando 9 

'AP9/N15 

Fuoco fatuo. Un appassionante adventure game con un percorso 
intricatissimo, mille trabocchetti, un troll e una principessa. Apple 
artista. Per destreggiarsi nella grafica ad alta risoluzione usando lo 
schermo come tavolozza e la tastiera come pennello. Data hello. Una 
semplice routine che permette di disporre di una clock card iemaliz¬ 
zando i dischetti con giorno, mese e anno. Lire 25.000 (abbonati 
20 . 000 ). 

'AP9/T16 

Sistema di forze parallele. Fissandone l'intensità e la posizione 
questo programma permette di visualizzare il centro di un sistema di 
forze sotto forma numerica e grafica. Traslazione e rotazione di una 
figura piana. Come far ruotare, traslare, rimpicciolire, ingrandire sul 
video una figura piana. Lire 30.000 (abbonati 25.000). 

Applicando 10 
"AP10/N14 

Ripristino. Come ripristinare programmi persi per un'accidentale 
istruzione di New o di Fp. Disk Map. Un detective del Dos per scoprire 
dove e come vengono immagazzinati i dati analizzando la mappa dei 
bit occupati. Autonumber. Una routine per autonumerare automatica- 
mente i programmi e allineare le linee con un ritorno carrello in input. 
Lire 30.000 (abbonati 25.000). 

"AP10/T17 

Rette nel piano cartesiano. Come individuare in cinque modi diversi 
una coppia di rette in un piano cartesiano e avere visualizzate le 
equazioni relative ai valori assegnati. Statistica. Come analizzare la 
correlazione fra due fenomeni o due caratteri e l'indice o coefficiente di 
Bravais che ne effettua la misura. Lire 30.000 (abbonati 25.000). 
Applicando 11 
'AP11/N18 

Apple edicola. Una banca dati per avere sotto controllo un articolo, il 
suo numero di pagina, la rivista su cui è stato pubblicato. Disk Zap. Il 
programma indispensabile per il debugging di un dischetto che ne 
risolve la maggior parte dei problemi. Messaggi personali. Quando la 
persona non c’è, per lasciare un messaggio basta impostarlo sulla 
tastiera. L'Apple farà il resto. Comparatore di programmi in basic. 
Una routine per risolvere dubbi sulle diverse versioni di uno stesso 
programma. Trappola per pochi. Un cacciatore contro tre animali 
feroci. Vince chi riesce a intrappolare senza essere intrappolato. Lire 
30.000 (abbonati 25.000). 

•AP11/T19 

Espressioni. Come risolvere un piccolo dramma familiare con l'aiuto 
di un elaboratore personale. Lire 25.000 (abbonati 20.000). 

Applicando 12-13 

AP12/N20 

Bridge. Un programma in altissima risoluzione grafica che permette di 
imparare il bridge o di giocarlo contro il computer. Microcalc. Un foglio 
elettronico di calcolo, spreadsheet, che mette a disposizione 20 righe 
per 20 colonne per un totale di 400 caselle da riempire come si vuole. 
Applesoft Line Editor. Una potente utility che permette l'editing dei 
programmi in Applesoft e aggiunge all'Apple un più ampio controllo del 
cursore. Lire 30.000 (abbonati 25.000). 

AP12/A21 

Budget (occorre Appleworks). Un prospetto che con l'inserimento di 
dati mensili e di medie preventive calcola automaticamente le medie 
consuntive e i relativi saldi mensili e annui. Lire 15.000. 


Bridge - API2/N20 

Il più economico dei programmi in 
commercio, per imparare e per 
giocare. Splendido per la grafica. 


AP12/A22 

Budget (occorre Visicalc). Un prospetto che con l'inserimento di dati 
mensili e di medie preventive calcola automaticamente le medie con¬ 
suntive e i relativi saldi mensili e annui. Lire 15.000. 

AP12/A23 

Cinque modelli Spreadsheet, tre modelli data base, due modelli 
Word Processor. Versione per Appleworks. Due dischetti. Lire 
80.000 (abbonati 70.000). 

AP12/A24 

Cinque modelli Spreadsheet. Versione per VisiCalc. Lire 40.000 
(abbonati 35.000). 

AP12/T25 

Animazione di una rotazione tridimensionale. Un esempio di come 
una rotazione tridimensionale permette di rappresentare gli oggetti 
proprio come li vediamo. Trasformazione da File a Data. Una utility 
per risolvere il problema di aggiungere a un programma preesistente 
delle istruzioni DATA ricavati da un altro file. Lire 25.000 (abbonati 
15.000). 

Applicando 14 

AP14/N26 

Golf. Un programma in altissima risoluzione grafica che permette di 
disegnare il proprio percorso di golf per poi giocarci a piacimento con 
gli amici. Autopiù. Con l'aiuto di questo programma non dimentichere¬ 
te più gli appuntamenti fissi dedicati alla manutenzione della vostra 
automobile. Lire 20.000. 

’API 4/N27 

Applebaby. Tre giochi didattici: il primo per imparare a contare in età 
prescolastica; il secondo per ripassare le tabelline; il terzo per eserci¬ 
tarsi nell ortografia. Lire 20.000. 

•AP14/A28 

Rimborso spese, (occorre Appleworks). Un prospetto che vi permet¬ 
te di preparare le vostre note spese automaticamente in cinque minuti. 
Lire 15.000. 

‘AP14/A29 

Rimborso spese, (occorre VisiCalc). Un prospetto che vi permette di 
preparare le vostre note spese automaticamente in cinque minuti. Lire 
15.000. 

•AP14/T30 

Frutteti. Un aiuto a risolvere uno dei più classici problemi di estimo.ln- 
stant Poster Voi scrivete con la tastiera del vostro Apple la frase che 
volete, e subito dalla stampante esce un poster formato gigante. Lire 
15.000. 


7 dischetti contrassegnati con asterisco contengono anche il pro¬ 
gramma Tombola, omaggio natalizio di Applicando e di Compushop, 
via Nomentana 265-273, Roma. 


Compilare e spedire il tagliando qui sotto a Applicando, Editronica Srl., Corso Monforte 39, 20122 Milano 


Vogliate inviarmi i seguenti dischetti: 



lAlPl 

1 / 1 

1A1 P 1 

l/l 1 1 1 

1A1 P 1 

l/l 1 1 1 

1A1 P 1 

| / | | | | 

1A1 P 1 

l/l 1 II 

1A1 P 1 

1 / 1 1 1 1 

1A 1 P 1 

l/l 1 1 1 


Sono abbonato: sì □ noD 


Cognome. Nome. 

Via. Cap..7. 

Città. Prov. 

Scelgo la seguente formula di pagamento: 

□ allego assegno di L.non trasferibile intestato a Editronica srl. 

□ allego ricevuta versamento di L. sul cc/p n. 19740208 intestato a 

Editronica srl. - Corso Monforte, 39 - 20122 Milano 

□ pago fin d’ora l’importo di L. con la mia carta 

di credito Bank Americard N. 

scadenza.autorizzando la Banca 

d'America e d’Italia ad addebitarne l’importo sul mio conto BankAmericard. 

Data. Firma. 




































Lettura indirizzi di memoria 

Ecco il contenuto di alcune locazioni di memoria e 
come possono essere lette per un controllo sui pro¬ 
grammi scritti in BASIC. Precisiamo che il valore delle 
locazioni è indicato in decimale. 

104—103 contengono l’indirizzo di inizio del pro¬ 
gramma in BASIC. 

176-175 contengono l’indirizzo di fine del program¬ 
ma in BASIC. 

106—105 contengono l’indirizzo di partenza dello 
spazio per le variabili semplici. 

108—107 contengono l’indirizzo di partenza dello 
spazio per le matrici. 

110—109 contengono l'indirizzo di fine dello spazio 
per le matrici. 

112-111 contengono l’indirizzo di partenza dello 
spazio per le variabili stringa. 

116-115 contengono l’indirizzo di fine dello spazio 
per le variabili stringa. 

230 contiene l’indirizzo della pagina in alta risoluzio¬ 
ne che stiamo usando (decimale 32 per la pagina 1, 64 
per la pagina 2). 

233—232 contengono i puntatori di inizio delle tavole 
delle figure. 

Gli indirizzi, in esadecimale, sono formati da quattro 
cifre, ovvero due BYTE, quello di sinistra detto byte 
alto e quello di destra detto byte basso. Ad esempio 
l’indirizzo di partenza del programma in Basic, normal¬ 
mente è (in esadecimale) 0801: 08 è il byte alto e 01 è il 
byte basso. Occorre ricordarsi che gli indirizzi di me¬ 
moria sono sempre memorizzati partendo dal byte bas¬ 
so. Ecco perché abbiamo indicato prima la locazione 
più alta e poi la più bassa. 

Ora per conoscere un qualsiasi indirizzo indicato 
sopra è sufficiente battere la seguente linea anche nel 
modo immediato ovvero senza numero di linea: 
PRINT PEEK(loc.mem.più alta)*256 + PEEK(loc- 
.mem.più bassa). Il risultato è un numero in decimale 
che indicherà l’indirizzo cercato. 


Screen switches 

Gli screen switches o interruttori dello schermo si 
utilizzano per passare velocemente dal testo alla grafica 
e viceversa usando dei semplici POKE. Certo sarebbe 
più facile utilizzare GR, HGR oppure HGR2; essi però 
hanno un difetto: quando presentano la pagina grafica 
relativa, contemporaneamente la cancellano. E se va 
bene all’inizio quando non abbiamo ancora disegnato 
nulla, in un secondo tempo dovremmo ridisegnare la 
figura. Sono molto utili per simulare il movimento di 
oggetti. Gli interruttori sono quattro: 


— 16303 da grafica a testo 

— 16304 da testo a grafica 

— 16299 mostra la pag. 1 

— 16300 mostra la pag. 2 

— 16301 grafica e quattro righe di testo 

— 16302 grafica a pieno schermo 

— 16297 grafica ad alta risoluzione (HGR) 

— 16298 grafica a bassa risoluzione (GR) 


Per usarli è sufficiente battere "POKE indirizzo,0". 
Ad esempio, se vi trovate in HGR con le quattro righe 
di testo e volete eliminarle, dovete battere "POK- 
E—16302,0" e il gioco è fatto. 


Come individuare gli errori 

Molti programmi contengono un comando un po’ 
particolare "ONERR GOTO(indirizzo)"; la sua inter¬ 
pretazione è "in presenza di un errore vai a....". Con 
questo comando viene attivato un meccanismo di rile¬ 
vazione di un eventuale errore che può avvenire duran¬ 
te l’esecuzione di un programma e per alcuni di essi la 
subroutine inserita all’indirizzo indicato contiene an¬ 
che la risoluzione automatica dell’errore. Vengono in¬ 
teressate alcune speciali locazioni di memoria. La loca¬ 
zione in valore decimale 222 contiene il numero dell’er¬ 
rore e viene letta con PRINT PEEK(222). Le locazioni 
118 e 119 contengono il valore relativo al numero di 
linea alla quale è avvenuto l’errore che viene evidenzia¬ 
to con PRINT PEEK(118) + PEEK(119)*256. L’ultima 
è la locazione 216 che viene azzerata con POKE 216,0 
dopo il rilevamento di un errore per ripristinare il mec¬ 
canismo stesso di rilevamento dell’errore dell’Apple- 
soft. 

Riportiamo una tabella degli errori che ricorrono 
maggiormente. 

- 0 NEXT without FOR (alla fine di un loop è stata 
messa la parola NEXT per incrementare il loop dimen¬ 
ticando di mettere il FOR all’inizio del loop stesso). 

- 4 WRITE PROTECTED (il disco è protetto per la 
scrittura). 

- 5 END OF DATA (fine dei dati di lettura di un file). 

- 6 FILE NOT FOUND (il file che si sta cercando sul 
disco non esiste). 

- 8 I/O ERROR (errore di ingresso/uscita dati). 

- 9 DISK FULL (disco pieno). 

- 10 FILE LOCKED (il file sul quale si vuole scrivere è 
bloccato). 

- 13 FILE TYPE MISMATCH (si è battuto un coman¬ 
do non adatto al tipo di file chiamato. Ad esempio, si è 
battuto LOAD per un file in binario). 

- 14 PROGRAM TOO LARGE (programma troppo 
lungo per la memoria a disposizione). 

- 16 SYNTAX ERROR (errore di sintassi). 

- 22 RETURN without GOSUB (il programma incon¬ 
tra un RETURN senza prima aver trovato il GOSUB 
relativo). 

- 42 OUT OF DATA (un comando READ viene in¬ 
contrato dopo che tutti i DATA sono stati regolarmen¬ 
te letti con un READ oppure i DATA che deve leggere 
il comando READ sono inferiori al numero di DATA 
che deve effettivamente leggere). 

- 90 UNDEFINED STATEMENT (il numero di linea 
di un indirizzamento GOSUB o GOTO non esiste). 

- 107 BAD SUBSCRIPT (si vuole assegnare ad una 
matrice un numero di valori superiore al suo dimensio¬ 
namento). 

- 120 REDIMENSIONED ARRAY (si è tentato di 
ridimensionare delle matrici già dimensionate in prece¬ 
denza). 

- 133 DIVISION BY ZERO (il programma si trova 
costretto a dividere per zero cosa che è matematica- 
mente indefinita. Ciò può accadere quando in una ope¬ 
razione matematica viene usata una variabile prima che 
le sia stato assegnato un valore). 

- 163 TYPE MISMATCH (si è fatto un assegnamento 
di tipo sbagliato ad una variabile. 

- 176 STRÌNG TOO LONG (si è fatto un concatena¬ 
mento di stringhe i cui caratteri totali sono più di 255). 
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IN DIRETTA 
DAL VOSTRO 
COMPUTER. 



TARGET MARKET 


N. CENTRAL 



Sistema Polaroid Palette 
per diapositive immediate 35 mm. 

Il sistema Polaroid Palette è stato con¬ 
cepito come unità periferica per i più diffu¬ 
si personal computers. 

Istogrammi, grafici, ed altri tipi di eia 
borati possono essere facilmente riprodot¬ 
ti nelle tonalità più sature e brillanti, gra¬ 
zie ad una scala cromatica di ben 72 colori. 

Il tutto in tempo reale, operando sia 
con schermo monocromo che a colori. 

Il sistema Polaroid Palette utilizza, in¬ 
fatti, il segnale di uscita del computer stes¬ 


so e consente elaborazioni fotografiche a 
colori sia su positivo (hard copy) che in 
diapositiva Polaroid 35 mm. 

Il sistema minimizza quindi laretinatu- 
ra dello schermo, per una riproduzione fo¬ 
tografica accurata e definita. 

Il sistema Polaroid Palette è uno stru¬ 
mento di lavoro per operatori di marke¬ 
ting, per ricercatori, per tutti coloro che 
necessitano di un adeguato supporto visi¬ 
vo alle loro presentazioni. 

Chiedete una dimostrazione al vo¬ 
stro rivenditore di fiducia e ai Distri¬ 
butori Specializzati Polaroid (indiriz¬ 
zi sulle Pagine Gialle). 


Per ulteriori informazioni spedite questo 
tagliando a: POLAROID (Italia) S.p.A. 
Divisione Prodotti Professionali 
Via Piave, li Tel. 0332/470031 
21051 ARCISATE (Varese) 



Mittente 


^Indirizzo 



_ Polaroid 


‘Polaroid" è un marchio registrato della Polaroid Corporation, Cambridge, Mass., USA. Polaroid 1985. 
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"Ovunque mi compri 
sono garantito 
un anno; ma solo 

la SALS INFORMATICA 

mi assiste gratuitamente 
a casa”. 


L'offerta è valida per 
tutti i sistemi APPLE 
venduti dalla 
SALS INFORMATICA, 
a Genova, a partire 
dal 31 marzo 1985. 





